foreach (sort $hash{$a} cmp $hash{$b} keys %hash)