On Mon, Feb 04, 2002 at 04:32:29PM -0500, Jeff 'japhy' Pinyan wrote:
> I have an interesting idea. Take Perl code, and jumble it around to
> something else (valid or not) and state the original code's purpose.
>
> # find all prime numbers
> $_||=(1)^(\1/~++$$)while +x._/+1;print
>
> The comment is correct, the code has been jumbled.
(1x$_)=~/^(.1+)\1+$/||print while++$_
and int he grand tradition of putting stuff
back together, I'm left with one ';' too many.
Joy,
`/anick
--
print map { ( split '', 'P arctehYkl.no' )[ hex ] }
split '', '86512cd57631063a1724963b';
