Select Code to Download

perl -e"BEGIN{$/=\2**21;binmode STDIN; $n=0}" 
    -ne"open my $fh,'>:raw', $ARGV.'.'.$n++; print $fh $_;" junk2

19/05/2005  22:01        34,000,000 junk2
05/08/2005  10:22         2,097,152 junk2.0
...
05/08/2005  10:22         2,097,152 junk2.8
05/08/2005  10:22         2,097,152 junk2.9
05/08/2005  10:25        34,000,000 this