Select Code to Download

### test_args.pl ###
use strict;
...
my $arg_str = join(" ", @args);
my $output = `print_args.pl $arg_str 2>&1`;
print "Output:\n$output";

### print_args.pl ###
use strict;
...
{
    print STDERR "Arg $i - $ARGV[$i]\n";
}