in reply to hashes sorted by value, but displaying both keys and values
foreach my $person (sort { $values{$b} <=> $values{$a} } keys(%values) +) { ... } [download]