id:sugyan さんにトラックバックされた。 変態的に書きたいときはこんなカンジでw perl -pe '$\=$_}{' hoge.log 最終行だけ表示するPerlワンライナー - すぎゃーんメモ ちょっと何書いてるのか理解できないですね(汗 % perl -le 'print for(1..10)' > hoge.log % cat hoge.log 1 2 3 4 5 6 7 8 9 10 % perl -pe '$\=$_}{' hoge.log 10 おぉ。ちゃんと動く。 全く理解できんので、スクリプト化してみる。 % perl -MO=Deparse -pe '$\=$_}{' hoge.log LINE: while (defined($_ = <ARGV>)) { $\ = $_; } { (); } continue { die "-p destination: $