develooper Front page | perl.golf | Postings from May 2008

Re: Just chipping in...

Thread Previous | Thread Next
From:
Jasper
Date:
May 19, 2008 08:59
Subject:
Re: Just chipping in...
Message ID:
81cd84130805190859h3b9d2c5fia0ca42fcc97f5d65@mail.gmail.com
stupid reply-to

2008/5/19 Jasper <jaspermccrea@gmail.com>:
> 2007/11/20 Tuomo Salo <bass@iki.fi>:
>> This one has no performance issues and is even a little bit shorter. Yay!
>>
>> #!perl -l
>> $r=qr/\((??{$r})*\)/;map/^$r+$/&&print,glob"{(,)}"x2x pop
>
> OK, so it took me a number(!) of months, but this is shorter, and
> prints in order..
>
>  #!perl -l
>  eval'$c-=fork?wait&&$c?s//(/:.1:- s//)/;'x2x pop||print
>
> Didn't I read a proverb somewhere about a tortoise and a hare, and the
> tortoise losing his job, and the hare shifting the blame onto the
> ex-tortoise?
> --
> Jasper
>



-- 
Jasper

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