Beefy Boxes and Bandwidth Generously Provided by pair Networks
There's more than one way to do things

Old_Gray_Bear's scratchpad

by Old_Gray_Bear (Bishop)
on Jun 01, 2004 at 17:49 UTC ( #358317=scratchpad: print w/replies, xml ) Need Help??

sort sort_sub, keys(%a_hash); # Sort allows you to use a subroutine to evaluate the keys. # See perldoc -f sort. sub sort_sub { return($a_hash{$a} cmp $a_hash{$b} } # -- Assumes that the values in the hash are character strings; use '< +=>' if they are not

Zen And The Art Of Perl Poetry
The path to mastery
How to apply patches to PM code
PerlMonks CSS Examples
Greatest programming mistakes and what to learn from