Select Code to Download

perl -e 'do $ARGV[0]; print "$_\n" for values %INC' test.pl

#!/usr/bin/perl
use strict;
...
system "perl -c .this_is_some_junk";
unlink ".this_is_some_junk";