Perlのワンライナー

ワンライナーはほとんど使わないが、「私、perlならそこそこ書けます」とか言っておいて「ああそう、じゃあこれちょっとワンライナーで書いて」と言われてできないというのはマズいからごく基本的なことはできるようにしておきたい。

perl -e 'for(1..20){print ($_**2); print "\n"};'

と思ったが、-e　をつけてシングルクォーテーションで囲んで一行で書くだけか・・・。