Mailing-List: contact cygwin-help@cygwin.com; run by ezmlm
List-Subscribe: <mailto:cygwin-subscribe@cygwin.com>
List-Archive: <http://sourceware.org/ml/cygwin/>
List-Post: <mailto:cygwin@cygwin.com>
List-Help: <mailto:cygwin-help@cygwin.com>, <http://sourceware.org/ml/#faqs>
Sender: cygwin-owner@cygwin.com
Mail-Followup-To: cygwin@cygwin.com
Delivered-To: mailing list cygwin@cygwin.com
Message-ID: <418A9BF3.5010903@familiehaase.de>
Date: Thu, 04 Nov 2004 22:15:31 +0100
From: "Gerrit P. Haase" <gp@familiehaase.de>
Organization: Esse keine toten Tiere
User-Agent: Mozilla/5.0 (Windows; U; WinNT4.0; de-AT; rv:1.7.3) Gecko/20040910
MIME-Version: 1.0
To: Earl Chew <earl_chew@agilent.com>
CC: cygwin@cygwin.com
Subject: Re: Perl binmode problem on text mount
References: <41897FF4.1080501@agilent.com>
In-Reply-To: <41897FF4.1080501@agilent.com>
Content-Type: text/plain; charset=us-ascii; format=flowed
Content-Transfer-Encoding: 7bit
X-IsSubscribed: yes

Earl Chew wrote:

> This code used to work on Perl 5.6.1-2 on Cygwin 1.3.10.
> 
> I've now moved to Perl 5.8.5-3 on Cygwin 1.5.11.
> 
> Here is the Perl program:
> 
>     binmode STDOUT;
>     print "Hello\n";
> 
> 1. Output to file on text mount
> 
>     perl foo.pl > foo.txt ; od -c foo.txt
> 
>     0000000  H e l l o \r \n    # Perl 5.8.5-3 Cygwin 1.5.11
>     0000000  H e l l o \n        # Perl 5.6.1-2 Cygwin 1.3.10
> 
> 2. Output to file via cat
> 
>     perl foo.pl | cat > foo.txt ; od -c foo.txt
> 
>     0000000  H e l l o \n        # Perl 5.8.5-3 Cygwin 1.5.11
>     0000000  H e l l o \n        # Perl 5.6.1-2 Cygwin 1.3.10
> 
> Has anyone else experienced the same issue?

Actually it is not perl writing \r here:

$ perl ./binmode.pl | od -c
0000000   H   e   l   l   o  \n
0000006

Gerrit
-- 
=^..^=

--
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/

