まずRubyで。 $ ruby -e 'puts (1..10).sort_by{rand}.join("\n")' 4 10 2 8 9 3 5 6 1 7 sort_by()かっこいいなー。 やっぱRubyちゃんと勉強しよう。時間ができ次第・・・ Perlにはこういうのないから明示的に乱数くっつけてやらないと。 こんな感じかな。 …