Select Code to Download

#!/usr/bin/env perl
# script1.pl
...
$ENV{'MY_NAME'} = 'script1';

print system('./script2.pl', 'arg'), "\n";

#!/usr/bin/env perl
# script2.pl

print $ENV{'MY_NAME'}, "\n";