while(<>) { print }

を他の言語だとどんだけ書かなきゃならないかって考えるとPerlサイコー！
しかし、他の言語に慣れてる奴が見たらPerlサイテーなんだろうなw