辞書順に並び替える。codepadで実行可。 #!/usr/bin/perl @categories = qw( # ここに文字列をかく hoge piyo ); # 並び替え @categories = sort {"\L$a" cmp "\L$b"} @categories; # 出力 foreach $each(@categories) { print $each . "\n"; }