如何在Perl脚本中运行Perl脚本？

在Perl脚本中运行另一个Perl脚本的方法是使用system()函数或backticks（`）运算符。下面是两种方法的示例：

方法1：使用system()函数

#!/usr/bin/perl

use strict;
use warnings;

my $script_to_run = "script2.pl";
my $exit_status = system("perl $script_to_run");

if ($exit_status == 0) {
    print "Script executed successfully.\n";
} else {
    print "Script execution failed with exit status: $exit_status.\n";
}

方法2：使用backticks运算符

#!/usr/bin/perl

use strict;
use warnings;

my $script_to_run = "script2.pl";
my $output = `perl $script_to_run`;

if ($output) {
    print "Script output: $output\n";
} else {
    print "Script execution failed.\n";
}

在这两个示例中，我们使用system()函数或backticks运算符来运行名为script2.pl的另一个Perl脚本。请确保将script2.pl替换为您要运行的实际脚本名称。

注意：在这两种方法中，我们都使用了perl命令来执行另一个脚本。这意味着您需要在系统上安装Perl并将其添加到环境变量中。