in reply to Re: Quick and portable way to determine line-ending string?
in thread Quick and portable way to determine line-ending string?
This is the kind of thing that'll probably work but I was trying to avoid because it's hard to track and get right:
my $nativeSeparator = "\n"; if ($^O =~ /MSWin32|dos|os2|cygwin/) { # not sure what to do about cygwin here. $nativeSeparator = "\x0d\x0a" } elsif ($^O eq 'MacOS') { $nativeSeparator = "\x0d" } elsif ($^O eq 'VMS') { # it depends on file type... what to do? } elsif (ord('A') eq 193) { # what to do for EBCDIC? "\n" may be OK... }
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
(Ovid) Re(3): Quick and portable way to determine line-ending string?
by Ovid (Cardinal) on Aug 09, 2001 at 04:46 UTC |