Re: Blast from the past: "Triple Challenge Tight Coding"

[Ton Hospel]

In article <a9i5mg$mb5$[EMAIL PROTECTED]>,
        [EMAIL PROTECTED] (Ton Hospel) writes:
> In article <[EMAIL PROTECTED]>,
>       Mtv Europe <[EMAIL PROTECTED]> writes:
>> I'm sorry for flooding.
>> 
>>>> -p @$=a..z;pop@$ while@$>3&&!/@$[-4..-1]/x;$_ x=@$>3
>>> that's better -
>>> -p @$=a..z;pop@$ until@$<4||/@$[-4..-1]/x;$_ x=@$>3
>> 
>> -p @$=a..z;1until/@$[-4..-1]/x|!--$#$;$_ x=@$>3
> Near the end it's going to match anyways, so you can do:
> -p @z=a..z;$#z--until/@z[-4..-1]/x;$_ x=@z>3
Rereading the originall august 2000 thread leads to:
-p $_ x=/[a-w](??{($a=$&)++;$a++.$a++.$a})/
(I'm not sorry for flooding)