[...] but sorted by the hash values [...]

You'd want to slip a sort into your code like ...

my @restaurantvalues = sort {
  $restaurant{$a} <=> $restaurant{$b}
} keys %restaurant;
[download]

See the Perl FAQ How do I sort a hash (optionally by value instead of key)? for further enlightenment. :)

    --k.