Select Code to Download

my @hashes = map {{split}} <>; #Ain't perl neat?

foreach (@hashes)
      my %hash = %{$_};
...
      }
      print "\n";
}

my @arrays = map {[split]} <>; # Got it?