Select Code to Download

open my $filelist, '>', $filelist 
        or die "Can't open $filelist: $!";

>perl -wMstrict -le
"my $filelist = 'xyzzy';
...
foo
bar
baz