Path: utzoo!utgpu!news-server.csri.toronto.edu!bonnie.concordia.ca!thunder.mcrcim.mcgill.edu!snorkelwacker.mit.edu!usc!zaphod.mps.ohio-state.edu!swrinde!elroy.jpl.nasa.gov!jpl-devvax!lwall
From: lwall@jpl-devvax.JPL.NASA.GOV (Larry Wall)
Newsgroups: comp.lang.perl
Subject: Re: Why are my digits disappearing?
Message-ID: <11004@jpl-devvax.JPL.NASA.GOV>
Date: 10 Jan 91 23:43:11 GMT
References: <136559@pyramid.pyramid.com> <F2tmzvm3@cs.psu.edu>
Reply-To: lwall@jpl-devvax.JPL.NASA.GOV (Larry Wall)
Organization: Jet Propulsion Laboratory, Pasadena, CA
Lines: 18

In article <F2tmzvm3@cs.psu.edu> flee@dictionopolis.cs.psu.edu (Felix Lee) writes:
: It looks like a Perl bug (tm).  Consider this fragment:
: 	for (1..3) {
: 		for $k (0..7) {
: 			$x = (1..4, 'a'..'d')[$k];
: 			print $x;
: 		}
: 		print "\n";
: 	}
: 
: This prints
: 	1234abcd
: 	1234
: 	1234

Fixed in 42.

Larry