>>716
はい、実際そのようにしています。
ただ、そのままchompをしただけだと行末が

cr ln → cr

となり、さらにこれに\nをつけて出力すると

cr → cr cr ln

となってしまいます。
そこで、chompの前に $/ = "\r\n" を入れれば期待通りの動作になるのですが、
そうすると>>712のコードが以下のように若干汚くなることが気になって質問したのです。

$/ = "\r\n";
while (<>){ chomp; print $_,"\n"; }