5.10 ハッシュをソートする

# keys関数でキーのリストを取得し、それらをsort関数でソートする
# %hashはソート対象のハッシュ
@keys = sort { criterion() } (keys %hash);
foreach $key (@keys) {
  $value = $hash{$key};
  # $key, $valueに対する処理を書く
}