develooper Front page | perl.golf | Postings from August 2002

Re: Reflections

Thread Previous | Thread Next
From:
Stephen Turner
Date:
August 9, 2002 00:54
Subject:
Re: Reflections
Message ID:
Pine.LNX.3.96.1020809084642.3192B-100000@gentoo
On Thu, 8 Aug 2002, Juho Snellman wrote:

> On Thu, Aug 08, 2002 at 08:31:44AM +0100, Stephen Turner wrote:
> > So, the empty regexp lets $` escape. How did you discover
> > that? Was it a brilliant insight, did you already know it, or was it (more
> > likely, in my experience) a fluke born out of desparation? :-)
> 
> *cough* I didn't know that the 'for' modifier created a lexical block.
> Until Ton announced my "innovation", I thought that it acted just like
> the 'while' modifier. :-)
> 

Ah yes, the good old "luck" approach!

I have to admit I didn't even remember that $` was confined to the dynamic
scope until I tried something like

#!perl -l
($`%9e9*$_||1)=~/0*$/for 0..pop;print$`%10    # BROKEN!


By the way, isn't it incredibly annoying that there isn't a single Perl
variable which defaults to 1? (My UID is 1000, which would have worked well,
but I doubted it met the "work everywhere" constraint. :-)

-- 
Stephen Turner, Cambridge, UK    http://homepage.ntlworld.com/adelie/stephen/
"This is Henman's 8th Wimbledon, and he's only lost 7 matches." BBC, 2/Jul/01


Thread Previous | Thread Next


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About