Select Code to Download

$ perl -MO=Deparse -anle 'print "Mypath\\MyPerl_2.pl $F[-1]"'
BEGIN { $/ = "\n"; $\ = "\n"; }
...
    our(@F) = split(' ', $_, 0);
    print "Mypath\\MyPerl_2.pl $F[-1]";
}