>>290
ようはフィルタでしょ？
スクリプトをfoo.plとか適当な名前で保存して、
フィルタに掛けたいファイルを用意して（例えばbar.txt）
perl foo.pl bar.txt
すりゃいいだけかと
ファイルに吐かせたいなら
perl foo.pl bar.txt > out.txt