If I execute this perl script
de010597> cat x.pl
#!/usr/bin/perl
use strict;
open( HO, "<x.txt" );
while (<HO>) { print "$_"; }
on a text mount with an input file that has CRLF line endings perl
should treat this as a text file and strip the CR. Only if I use
binmode HO should I see the CR. But it doesn't:
de010597> ./x.pl | cat -A
bla^M$
de010597> cat -A x.txt
bla^M$
What am I missing here?
de010597> pwd
/d/jakarta-tomcat/awstats
de010597> mount
D:\PROGRA~1\cygwin\bin on /usr/bin type system (binmode)
D:\PROGRA~1\cygwin\lib on /usr/lib type system (binmode)
D:\PROGRA~1\cygwin on / type system (binmode)
c: on /c type system (textmode,noumount)
d: on /d type system (textmode,noumount)
f: on /f type system (textmode,noumount)
de010597> mount -m
mount -f -s -b "D:/PROGRA~1/cygwin/bin" "/usr/bin"
mount -f -s -b "D:/PROGRA~1/cygwin/lib" "/usr/lib"
mount -f -s -b "D:/PROGRA~1/cygwin" "/"
mount -s -t --change-cygdrive-prefix "/"
de010597> uname -a
CYGWIN_NT-5.2 de010597 1.5.18(0.132/4/2) 2005-07-02 20:30 i686 unknown
unknown Cygwin
de010597> perl -v
This is perl, v5.8.7 built for cygwin-thread-multi-64int