>>254
とりあえず正攻法で。

my @ranking = sort { $hoge{$a} <=> $hoge{$b} } (keys %hoge);