Using customized function to sort keys in a hash : sort « Hash « Perl






Using customized function to sort keys in a hash

    



$hash{fruit} = apple;
$hash{sandwich} = hamburger;
$hash{drink} = bubbly;

foreach $key (sort {myfunction($a, $b)} keys %hash) {
    print "$key => $hash{$key}\n";
}

sub myfunction
{
   return (shift(@_) cmp shift(@_));
}

   
    
    
    
  








Related examples in the same category

1.Hash Value Sorting
2.Numerically Sort a Hash by Values in Ascending Order
3.Numerically Sort a Hash by Values in Descending Order
4.Sort Hash by Keys Numerically
5.Sort Hash by Keys in Reverse Order
6.Sort keys in a hash
7.Sort values in a hash
8.Sorting a Hash
9.Ordered hash