On Sun, Dec 07, 2003 at 06:39:50PM -0800, drieux wrote:
>
> On Dec 7, 2003, at 5:40 PM, Bryan Harris wrote:
> [..]
> >>I have tried to strip the carriage return of the last field
> >>
> >>$field[8] =~ s/\015//g;
> >
> >Uh, isn't the carriage return code 13?
>
> our $CRLF = "\015\012"; # "\r\n" is not portable
>
> [jeeves: 42:] perl -e 'print ord("\n")'
> 10[jeeves: 43:] perl -e 'print ord("\r")'
> 13[jeeves: 44:]
>
>
> I think we may have found the OOOPSIE...
I'm not absolutely sure what you are getting at.
$ perl -le 'print 015'
13
--
Paul Johnson - [EMAIL PROTECTED]
http://www.pjcj.net
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
