How do I sort a hash (optionally by value instead of key)?

[Mark]

The following is given in the FAQ on how to sort a hash...

    my @keys = sort { $a cmp $b } keys %hash;

    foreach my $key ( @keys )
             {
             printf "%-20s %6d\n", $key, $hash{$value};
             }

Shouldn't that be $hash{$key} ?

Also, I think it would be better to use K&R bracketing instead
of GNU bracketing.

Thanks for listening.

- Mark