2006-08-16 短くキレイに。 Perl Programming http://sonic64.com/2006-06-25.html perl -e '$s += ($_ ** 2) foreach (1..10); print $s;' かな。あるいは、 perl -e '$s += ($_ ** $_) foreach (1..10); print $s;' こう。最近、生業にしている人のPerl(のコード)を見ることが多いけど、なんか冗長。。。 Perlってキレイな言語だと思うのに。実際、自分で使わないから、そう思ってるだけなのかもね。