シェルスクリプト総合 その9

[0909 名無しさん＠お腹いっぱい。 2008/02/11(月) 14:50:12]

すみません。
unixのwc -lコマンドと同等のものを
perlやawkの一行野郎にしたいのですがうまくいきません

perl -ne 'while (<>) { print cnt}' file1
お願いします