Mailing-List: contact cygwin-help AT cygwin DOT com; run by ezmlm List-Subscribe: <mailto:cygwin-subscribe AT cygwin DOT com> List-Archive: <http://sources.redhat.com/ml/cygwin/> List-Post: <mailto:cygwin AT cygwin DOT com> List-Help: <mailto:cygwin-help AT cygwin DOT com>, <http://sources.redhat.com/ml/#faqs> Sender: cygwin-owner AT cygwin DOT com Mail-Followup-To: cygwin AT cygwin DOT com Delivered-To: mailing list cygwin AT cygwin DOT com Date: Sat, 31 May 2003 23:00:42 +0800 From: Greg Matheson <lang AT ms DOT chinmin DOT edu DOT tw> To: cygwin AT cygwin DOT com Subject: Re: Should PERLIO=no_crlf be the default on Cygwin? Message-ID: <20030531230042.A31829@ms.chinmin.edu.tw> Mail-Followup-To: cygwin AT cygwin DOT com References: <001601c324fc$16d4f700$6500a8c0 AT ufo> <002901c32504$947701f0$78d96f83 AT pomello> <68785452711 DOT 20030530171948 AT familiehaase DOT de> <20030531065029 DOT A27011 AT ms DOT chinmin DOT edu DOT tw> <0855760618 DOT 20030531125136 AT familiehaase DOT de> Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii Content-Disposition: inline User-Agent: Mutt/1.2.5i In-Reply-To: <0855760618.20030531125136@familiehaase.de>; from gp@familiehaase.de on Sat, May 31, 2003 at 12:51:36 +0200 On Sat, 31 May 2003, Gerrit P. Haase wrote: > #!/usr/bin/perl > open OUTFILE, ">:crlf", "text.txt"; > print OUTFILE "This is a test.\n"; > close OUTFILE; Oh, yeh. That works. greg AT 7106 ~ $ perl -e 'open OUTFILE,">:crlf","text.txt";print OUTFILE "\n";' ; cat text.txt|od -a 0000000 cr nl 0000002 greg AT 7106 ~ $ perl -e 'open OUTFILE,">:bytes","text.txt";print OUTFILE "\n";' ; cat text.txt|od -a 0000000 nl 0000001 Oops. greg AT 7106 ~ $ export PERLIO=bytes greg AT 7106 ~ $ perl -e 'open STDOUT,">:crlf",">&1"' produced a segfault. And now the first of those one-liners above is also producing segfaults: This GDB was configured as "i686-pc-cygwin"...(no debugging symbols found)... Attaching to program `/usr/bin/PERL.EXE', process -15762415 [Switching to thread -15762415.0xfff2697d] (gdb) bt #0 0xbff76921 in KERNEL32!CallNamedPipeW () #1 0xbff88027 in KERNEL32!BuildCommDCBA () #2 0x100fe8af in cygperl5_8_0!PerlIO_openn () from /usr/bin/cygperl5_8_0.dll #3 0x100dc088 in cygperl5_8_0!Perl_do_openn () from /usr/bin/cygperl5_8_0.dll #4 0x100c8ee3 in cygperl5_8_0!Perl_pp_open () from /usr/bin/cygperl5_8_0.dll #5 0x100787fd in cygperl5_8_0!Perl_runops_debug () from /usr/bin/cygperl5_8_0.dll #6 0x10004697 in perl_run () from /usr/bin/cygperl5_8_0.dll #7 0x10004355 in perl_run () from /usr/bin/cygperl5_8_0.dll #8 0x0040113d in ?? () #9 0x61007408 in cygwin1!__assert () from /usr/bin/CYGWIN1.DLL #10 0x610076ed in dll_crt0 AT 0 () from /usr/bin/CYGWIN1.DLL #11 0x00403ed2 in ?? () #12 0x0040103c in ?? () #13 0xbff8b6be in KERNEL32!EnumTimeFormatsA () #14 0xbff8b570 in KERNEL32!FT_Thunk () #15 0xbff89f33 in KERNEL32!BeginUpdateResourceA () Cannot access memory at address 0x83b51fec -- Greg Matheson Failed to turn my reluctant students into autonomous Dr Bean's Penpal Pool language learners, but it did wonders for my personal Address: palpool fitness program. Domain: @cn91.chinmin.edu.tw -- Unsubscribe info: http://cygwin.com/ml/#unsubscribe-simple Problem reports: http://cygwin.com/problems.html Documentation: http://cygwin.com/docs.html FAQ: http://cygwin.com/faq/