develooper Front page | perl.fwp | Postings from December 2001

Re: Santa Hole 5 (wc.pl) Post Mortem

Thread Previous | Thread Next
From:
Piers Cawley
Date:
December 7, 2001 02:46
Subject:
Re: Santa Hole 5 (wc.pl) Post Mortem
Message ID:
m2r8q7xqv8.fsf@bofh.org.uk
BooK <philippe.bruhat@free.fr> writes:
> En réponse à Piers Cawley <pdcawley@bofh.org.uk>:
>
>> Michael G Schwern <schwern@pobox.com> writes:
>> 
>> > On Fri, Dec 07, 2001 at 10:36:50AM +1100, Andrew.Savige@ir.com
>> wrote:
>> >> --- Piers Cawley --------------------- 21
>> >> #!/usr/bin/perl -lp
>> >> $#='%010g'}{$_=$.
>> > 
>> > Shouldn't that be 20?
>> 
>> Nope. The space before the '-' counts.
>>
>> But I was pretty proud of this one. And surprised that nobody else
>> found it. Course, I'm still annoyed that I found this but not the $\
>> based reverse.
>
> I love this one. As an added bonus, perlvar says "Use of $# is deprecated."

Indeed. And it doesn't quite work in all cases either. An early
version looked like:

#!perl -pl
$#='%010g'}for($.){

Okay, so it was longer than the final version but bear with me. The
thing is, it doesn't work. And I don't quite know why.

-- 
Piers

   "It is a truth universally acknowledged that a language in
    possession of a rich syntax must be in need of a rewrite."
         -- Jane Austen?

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