Mega Code Archive

 

Categories / Perl / Hash

 

Sorting a Hash

%salary = (         "P"   => 10,         "S"   => 12,         "C"   => 5,         "S"   => 6,         "L"   => 11,         "D"   => 8, ); foreach $key( sort(keys %salary)) {     printf "\t% -20s%5d\n", $key, $salary{$key}; }