Help for this page
use subs qw(system); my $SYSTEM_SUCCESS = 0; ... } local @ARGV = @test_args; do 'launch_rockets.pl';
use Proc::Background;
Proc::Background->new('perl', 'launch_missiles.pl');