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
Delivered-To:	mailing list cygwin AT cygwin DOT com
X-Mailer:	21.4 (patch 6) "Common Lisp (candidate 1)" XEmacs Lucid (via feedmail 10 I)
To:	cygwin AT cygwin DOT com
Subject:	Re: bug in cygwin perl 5.6.1?
References:	<LAW2-OE14zjwakzNFfh00000a63 AT hotmail DOT com>
	<3C5DB3B8 DOT 25163 DOT 219A3CC AT localhost> <20020203212921 DOT GA31365 AT redhat DOT com>
X-Face:	I-*}xvwusAv%MlABo'jVNP7TDXf5bb*L[q,r{DnsR1GoL07^Wf)sAu%>!LjXAFlZZN+`OQu
	}?#du]C)[*%ERKR#+l#sX'EoNbSO~|.x AT ogoS5|"-u?<s5ViLslvYMlj7_n!Tq1m AT xt2Bhj4[Zg+e?
	/Yy\SE`V?%v~kRU3GoS1f&U]}
From:	"Dr. Volker Zell" <Dr DOT Volker DOT Zell AT oracle DOT com>
Date:	Mon, 04 Feb 2002 12:51:03 +0100
In-Reply-To:	<20020203212921.GA31365@redhat.com> (Christopher Faylor's
	message of "Sun, 3 Feb 2002 16:29:21 -0500")
Message-ID:	<kvheoxv520.fsf@vzell.de.oracle.com>
Lines:	26
User-Agent:	Gnus/5.090005 (Oort Gnus v0.05) XEmacs/21.4 (Common Lisp
	(candidate 1), i686-pc-cygwin)
MIME-Version:	1.0

>>>>> "Christopher" == Christopher Faylor <cgf AT redhat DOT com> writes:

    Christopher> perl -e 'print $^S || 0, "\n";eval {print $^S || 0, "\n"}; print $^S || 0, "\n";'

    Christopher> This should print:

    Christopher> 0
    Christopher> 1
    Christopher> 0

    Christopher> Instead, it prints:

    Christopher> 0
    Christopher> 1
    Christopher> 1

Here it gives:

08:41pm [500]> perl -e 'print $^S || 0, "\n";eval {print $^S || 0, "\n"}; print $^S || 0, "\n";'
0
1
0


Ciao
  Volker


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

- Raw text -