Help for this page

Select Code to Download


  1. or download this
    #!perl -l
my %tallies=(h=>30,a=>10,j=>1,p=>20);
...
Keys:phaj
Bad :phaj
Good:japh
  2. or download this
    keys %tallies;
  3. or download this
    sort {my ($a,$b); $a <=> $b } keys %tallies;