Perl
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(のコード)を見ることが多いけど、なんか冗長。。…
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(のコード)を見ることが多いけど、なんか冗長。。…