30分プログラム、その609。sortみたいに$aや$bで引数を渡したい。 Perlのsort関数は変った仕様になっていて、引数を$aと$bで受け取ります。 @articles = sort {$a cmp $b} @files; でも普通に定義したら、こんなことできない。 どうやったら、こんなことがで…