>   If you still care, all you have to do is a simple (and famous 
>even) one liner to convert'em all.  Works on virtually any given 
>platform.
>
>       perl -i.bak -ple 's/(\012\015|\012|\015)/\n/g' files ....

Yeah, that's fine - converting them is easy (heck the little tool, 
DropText will do that easily enough).  But I'd rather just have my 
Perl script handle whatever it gets.  I used to just write:

while (<>) {
   tr/\015\012//d;
   ...
}

And that would work with CR or CRLF (or under unix with LF or CRLF).

But it doesn't work with CR or LF (only one works).  It's that sort 
of trick I'm looking for, something simple I can add which will make 
Perl work properly.

Failing that, some sort of extension to Perl to set $/ such that it 
handles CR or LF or CRLF would be useful, especially while we have 
some many of both CR and LF files on Macs...

I guess I could always get the perl source and bash the readline 
command, or write some sort of external command to do it, but neither 
of those are particular good solutions.
    Peter.
-- 
<http://www.interarchy.com/>  <ftp://ftp.interarchy.com/interarchy.hqx>

Reply via email to