foreach(sort {$hash{$a} cmp $hash{$b}} keys %hash){ print "$_ -> $hash{$_}\n"; }