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...
ciao drieux
---
-- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>