print map { "$_\t=>$byFile{$_}\n" } keys %byFile; #### print "$_\t=>$byFile{$_}\n" for keys %byFile; # look Ma! no map! :-)