Perl コーディング初心者質問コーナー Part27

[0066 nobodyさん 03/08/16 04:40 ID:???]

my %hash = (
5 => 5,
10 => 10,
15 => 15,
30 => 30,
50 => 50
);

このようなデータを

foreach my $key (sort keys %hash) {
print $key;
}

このようにsortすると、

10
15
30
5
50

となりますよね。

この5が一番上にいくような効率のいい方法はないもの
でしょうか。