Help for this page

Select Code to Download


  1. or download this
    my %byFile = map { reverse split } <DATA>;
  2. or download this
    print map {"$_\t=>$byFile{$_}\n"} keys %byFile;