Return-Path: <richard@tmtowtdi.perl.org>
Mailing-List: contact perl5-porters-help@perl.org; run by ezmlm
Delivered-To: mailing list perl5-porters@perl.org
Received: (qmail 9800 invoked by uid 511); 19 Nov 1999 21:17:10 -0000
Subject: reply via in-reply-to 
Sender: schwern@athens.arena-i.com
To: perl5-porters@perl.org
From: perlbug_test@rfi.net
Received: (qmail 9792 invoked by uid 508); 19 Nov 1999 21:17:09 -0000
Content-Type: text/plain; charset=us-ascii
User-Agent: Mutt/1.0i
Mime-Version: 1.0
Date: Fri, 19 Nov 1999 16:17:04 -0500
Message-Id: <1999abc111916xx704.in_reply_to@bugs.perl.org>
In-Reply-To: <199_91127_asdfkj_022406.B19852@monk.not.here.at.edu>
X-Matches:  non-existent reply to message-id -> do_quiet

For some reason, Perl accepts a while loop with an empty conditional.  while ( ) { print "TRUE";  sleep 1;  }
results in a big list of TRUEs.  This is odd in several ways:

	1)  Everything else (until, if, unless...) is a syntax error with an
		empty condition.
	2)  The empty condition of a while loop is TRUE!  If anything I would
		expect false.
	3)	There's no warning.
    .

-- 

Michael G Schwern                                           schwern@pobox.com
                    http://www.pobox.com/~schwern
     /(?:(?:(1)[.-]?)?\(?(\d{3})\)?[.-]?)?(\d{3})[.-]?(\d{4})(x\d+)?/i
