Re: Linus sequence

[email protected] ((Ton Hospel)) Fri, 19 Dec 2003 18:31:01 +0000 (UTC)
Newsgroups 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:
>> 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