Select Code to Download

johngg@shiraz:~/perl/Monks$ perl -Mstrict -Mwarnings -E '
open my $inFH, q{<}, \ <<__EOF__ or die $!;
...
1 2 3 echo
1 2 3 fox
1 2 3 yellow banana