Re: First JAPH - Spell perl in two hundred and eighty five thousand and seventy four easy steps

Haha! ++! Great one!

Nice piece of code for a game of golf too...

# First attempt
#        1         2         3
#23456789012345678901234567890
$a=a;$a++for 0..285074;print$a

# Second attempt (cheating :P)
print'perl'
[download]

2;0 juerd@ouranos:~$ perl -e'undef christmas'
Segmentation fault
2;139 juerd@ouranos:~$
[download]

Comment on Re: First JAPH - Spell perl in two hundred and eighty five thousand and seventy four easy steps Select or Download Code

Replies are listed 'Best First'.
Re: Re: First JAPH - Spell perl in 285049 easy steps by gmax (Abbot) on Jan 10, 2002 at 18:58 UTC
`# 1 2 #234567890123456789012345678 $\=z;$\++for 0..285049;print` [download] Faster, too ;-) update Cheating: `\:->>` `# 1 2 #2345678901234567890123456 $\=z;$\++for z..perk;print` [download] _ _ _ _ (_\|\| \| \|(_\|>< _\|	[reply] [d/l] [select]
Re: Re: Re: First JAPH - Spell perl in 285049 easy steps by Anonymous Monk on Jun 01, 2004 at 19:53 UTC
So then, if we really want to cheat: `# 1 #234567890123456 print++($_=perk)` [download]	[reply] [d/l]