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
X-Authentication-Warning: slinky.cs.nyu.edu: pechtcha owned process doing -bs
Date: Tue, 27 May 2003 20:44:40 -0400 (EDT)
From: Igor Pechtchanski <pechtcha AT cs DOT nyu DOT edu>
Reply-To: cygwin AT cygwin DOT com
To: Tom Rodman <nicebounce AT trodman DOT com>
cc: cygwin AT cygwin DOT com
Subject: Re: binmode() workaround; non ":raw" default- is this a bug or by
 design?
In-Reply-To: <200305272153.h4RLrqOu007681@tigris.pounder.sol.net>
Message-ID: <Pine.GSO.4.44.0305272041480.22452-100000@slinky.cs.nyu.edu>
Importance: Normal
MIME-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII

On Tue, 27 May 2003, Tom Rodman wrote:

> --------
>
> to review.. the problem (UNIX style lines converted to DOS):
> --v-v------------------C-U-T---H-E-R-E-------------------------v-v--
> bash-2.05b$ printf "\r\n\n"|perl -pe '1;'|od -a
> 0000000  cr  nl  cr  nl
> 0000004
>
> work around:
> --v-v------------------C-U-T---H-E-R-E-------------------------v-v--
> bash-2.05b$ printf "\r\n\n"|perl -pe '
>   BEGIN {
>     binmode (\*STDIN, q{:raw});
>     binmode (\*STDOUT,q{:raw});
>       # would "binmode (STDOUT,q{:raw }); be as good?
>   }
>   1;' | od -a
> 0000000  cr  nl  nl
> 0000003
> bash-2.05b$ perl -v|grep 'This is';uname -r
> This is perl, v5.8.0 built for cygwin-multi-64int
> 1.3.22(0.78/3/2)
> <snipped>
> --^-^------------------C-U-T---H-E-R-E-------------------------^-^--
>
> Comments please.
> Tom

Tom,

Try

$ printf "\r\n\n"|PERLIO=perlio perl -pe '1;'|od -a

(see <http://cygwin.com/ml/cygwin/2003-03/msg01093.html>).
	Igor
-- 
				http://cs.nyu.edu/~pechtcha/
      |\      _,,,---,,_		pechtcha AT cs DOT nyu DOT edu
ZZZzz /,`.-'`'    -.  ;-;;,_		igor AT watson DOT ibm DOT com
     |,4-  ) )-,_. ,\ (  `'-'		Igor Pechtchanski
    '---''(_/--'  `-'\_) fL	a.k.a JaguaR-R-R-r-r-r-.-.-.  Meow!

"I have since come to realize that being between your mentor and his route
to the bathroom is a major career booster."  -- Patrick Naughton


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