Select Code to Download

#!/usr/bin/perl --
use strict; use warnings;
use File::Slurp;
...
for my $f ( @junk ){
    my( $what, $junk ) = split /whatever/, scalar read_file( $f );
}

Summary of my perl5 (revision 5 version 14 subversion 1) configuration
+:
  Commit id: cc92ef02098c000d945bcf93c92bdb2a0a05fa97
  Platform:
...
    C:/perl/5.14.1/lib/MSWin32-x86-multi-thread
    C:/perl/5.14.1/lib
    .