my @keys = sort keys %hash; # adapt to your needs here.

for (@keys) {
  print "$_ => $hash{$_}\n";
}

##</code><code>##

my @keys = map { tr/a-zA-Z/A-Za-z/; $_ } sort map { tr/a-zA-Z/A-Za-z/; $_ } keys %hash;