in reply to text files from mac

open INFILE, $ARGV[0] or die $!; open OUTFILE, $ARGV[1] or die $!; while(<INFILE>){ s/$/\n/; print OUTFILE $_; }