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

#!/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";
}

#!/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";
}