Anonymous Monk has asked for the wisdom of the Perl Monks concerning the following question:
foreach $file (@ARGV) { print "Processing $file\n"; open DOIT, "| tr -s '\012\015' '\012\012' < $file > fixm_temp" or + die "*** Can't: tr '\015' '\012' < $infile > $outfile\n"; close DOIT; open DOIT, "| mv -f fixm_temp $file" or die "*** Can't: mv -f fixm_temp $file\n"; close DOIT; }
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re: Another dos to unix question
by Juerd (Abbot) on May 18, 2004 at 15:26 UTC | |
|
Re: Another dos to unix question
by monkey_boy (Priest) on May 18, 2004 at 15:52 UTC | |
|
Re: Another dos to unix question
by Fletch (Bishop) on May 18, 2004 at 15:22 UTC | |
by Anonymous Monk on May 18, 2004 at 15:25 UTC | |
by Fletch (Bishop) on May 18, 2004 at 15:30 UTC | |
by Abigail-II (Bishop) on May 18, 2004 at 15:52 UTC | |
by graff (Chancellor) on May 18, 2004 at 19:37 UTC |