【CGI・Perl】数値の値でソートする (Perl, sort)

CGI・Perl例文集 CGI(Perl)のサンプルプログラムをコピー＆ペーストで使える便利集！ カテゴリー：ソート(並べ替え) リスト(配列) 数値の値でソートする (Perl, sort) 以下のようなコードを書くと、文字列として扱われてしまい、意図した結果にならない場合がある。 @array = ( 1, 2, 3, 4, 5, 10, 11, 12 ); foreach(sort @array){ print ; print "\n" } ○実行結果 1 10 11 12 2 3 4 5 これを回避するコードは次のようなものである。 @array = ( 1, 2, 3, 4, 5, 10, 11, 12 ); #-- 昇順 --# foreach(sort {$a <=> $b} @array){ print ; print "\n" } #