Re: Linus sequence

[email protected] (Ton Hospel) Fri, 19 Dec 2003 18:38:51 +0000 (UTC)

Newsgroups	gmane.comp.lang.perl.golf
Organization	lunix confusion services
Message-ID	<[email protected]>

In article <[email protected]>,
	[email protected] (Ton Hospel) writes:
> In article <[email protected]>,
> 	[email protected] (Ton Hospel) writes:
>> In article <[email protected]>,
>> 	[email protected] (Ton Hospel) writes:
>>> perl -le 'print$@.=$@!~/(.*)(1|2)\1$/||3-$2for 0..98'
>> and of course:
>> perl -le 'print$@.=$@!~/(.*)(.)\1$/||3-$2for 0..98'
> mtve:
> print$_.=!/(.*)(.)\1$/||3-$2for($_)x99
mtve again:
print$_.=3**/(.*)(.)\1$/-$2for($_)x99