This is the mail archive of the
cygwin@cygwin.com
mailing list for the Cygwin project.
Re: Updated: perl-5.8.0-2
- From: "Gerrit P. Haase" <gp at familiehaase dot de>
- To: Rolf Campbell <rcampbell at tropicnetworks dot com>
- Cc: cygwin at cygwin dot com
- Date: Wed, 2 Apr 2003 07:32:53 +0200
- Subject: Re: Updated: perl-5.8.0-2
- Organization: Esse keine toten Tiere
- References: <83040F98B407E6428FEC18AC720F5D732DB804@exchange.tropicnetworks.com><121-156912388.20030401120153@familiehaase.de> <b6cdqm$v99$1@main.gmane.org>
Hallo Rolf,
Am Dienstag, 1. April 2003 um 18:13 schriebst du:
> Gerrit P. Haase wrote:
>> Rolf schrieb:
>>>So, is this a cygwin perl problem? Or has the stock perl decided
>>>to only work with magic ENV variables?
>> I don't see the problem in the latest Perl (5.9.0) and I'm trying to
>> figure out how it can be fixed, in the meantime, please try to use the
>> magic PERLIO=perlio setting for your environment.
>> Gerrit
> Ok, using PERLIO=perlio, but I'm still having a problem (which worked in
> the previous version of Perl).
> TEST.PL:
> 1:#!/bin/perl
> 2:$/ = "\r\n";
> 3:
> 4:open( LOG, "<in" ) ||
> 5: die "Could not open log.\n";
> 6:binmode LOG, ":crlf";
> 7:
> 8:$in = <LOG>;
> 9:print $in;
> in (od -c in):
> 0000000 a b c \r \n d e f \r \n
> 0000012
> This is on a BINMODE mount. This script outputs "0000000 a b c
> \n d e f \n". If I go back to prev Perl, OR remove line#2 OR
> remove line#6, then it outputs "0000000 a b c \n"
1. No PERLIO setting:
$ od -c in
0000000 a b c \r \n a b c \r \n
0000012
$ ./crlf.pl 2>&1 | tee log.in
abc
abc
$ od -c log.in
0000000 a b c \r \n a b c \r \n
0000012
2. PERLIO=perlio:
$ export PERLIO=perlio
$ ./crlf.pl 2>&1 | tee log.in
abc
abc
$ od -c log.in
0000000 a b c \n a b c \n
0000010
3. PERLIO=raw:
$ export PERLIO=raw
$ ./crlf.pl 2>&1 | tee log.in
abc
abc
$ od -c log.in
0000000 a b c \n a b c \n
0000010
4. PERLIO=stdio:
$ export PERLIO=stdio
$ ./crlf.pl 2>&1 | tee log.in
abc
abc
$ od -c log.in
0000000 a b c \n a b c \n
0000010
5. PERLIO=:
$ export PERLIO=
$ ./crlf.pl 2>&1 | tee log.in
abc
abc
$ od -c log.in
0000000 a b c \r \n a b c \r \n
0000012
Gerrit
--
=^..^=
--
Unsubscribe info: http://cygwin.com/ml/#unsubscribe-simple
Bug reporting: http://cygwin.com/bugs.html
Documentation: http://cygwin.com/docs.html
FAQ: http://cygwin.com/faq/