Path: utzoo!utgpu!jarvis.csri.toronto.edu!mailrus!uwm.edu!ogicse!decwrl!orc!mipos3!iwarp.intel.com!news
From: merlyn@iwarp.intel.com (Randal Schwartz)
Newsgroups: comp.lang.perl
Subject: $0 save (was Re: "MOST COMMON NOVICE BUG" contest)
Message-ID: <1990Mar11.010306.8707@iwarp.intel.com>
Date: 11 Mar 90 01:03:06 GMT
References: <15230@bfmny0.UU.NET> <15232@bfmny0.UU.NET> <1118@etnibsd.UUCP> <1990Mar10.210646.16041@NCoast.ORG>
Sender: news@iwarp.intel.com
Reply-To: merlyn@iwarp.intel.com (Randal Schwartz)
Organization: Stonehenge; netaccess via Intel, Beaverton, Oregon, USA
Lines: 12
In-Reply-To: allbery@NCoast.ORG (Brandon S. Allbery)

In article <1990Mar10.210646.16041@NCoast.ORG>, allbery@NCoast (Brandon S. Allbery) writes:
| 2) not saving $0, ..., $9 across regexps, or $0 at the start of a program

$0 save is *no longer* necessary as of PL12.  One of the better
"breaks existing code" changes.

%X=split(/(\d)/,'another2Perl4hacker,8Just1');sub X {$X{$a}<$X{$b}?-1:1;} print join(" ",sort X keys X);
-- 
/=Randal L. Schwartz, Stonehenge Consulting Services (503)777-0095 ==========\
| on contract to Intel's iWarp project, Beaverton, Oregon, USA, Sol III      |
| merlyn@iwarp.intel.com ...!any-MX-mailer-like-uunet!iwarp.intel.com!merlyn |
\=Cute Quote: "Welcome to Portland, Oregon, home of the California Raisins!"=/