参照 - 株式会社エスロジカル - 技術ドキュメント Perl：配列・連想配列を条件に基づいてソート(sort) こうする for my $key (sort keys %hash) { print $key . "=" . $hash{$key} . "\n"; }