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