perl -pe1 infile > outfile

##</code><code>##

perl -i.bk -pe1 file

##</code><code>##

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