Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl: the Markov chain saw

Dollar Plus

by martin (Friar)
on Sep 30, 2010 at 13:36 UTC ( #862789=obfuscated: print w/ replies, xml ) Need Help??

$;^=$;;$:='+';${::}{$:}=$_,for{},[];$==65;@+=map{$=<<=1; $=^=131,if+128&$=;chr$=}0..1<<8;@+{@+}=(0..126)x$=;print map{$:=$+[$+{$:}+$+{z}];$/=$;;$/=$;eq$/?$_:$+[$+{$/}+$+{ $:}]^$_,for@_;$/}@_=split//,'C|fqF[Ja-Dh{wzZf8t})1N@C:';

My second contribution here does not like strictures, I admit, but mostly for aesthetical reasons. With a rather simple change it would. And ambrus is right: This kind is somewhat less like minigolf.

Comment on Dollar Plus
Download Code
Replies are listed 'Best First'.
Re: Dollar Plus
by ambrus (Abbot) on Oct 01, 2010 at 17:51 UTC
Re: Dollar Plus
by ambrus (Abbot) on Oct 02, 2010 at 21:30 UTC

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: obfuscated [id://862789]
Approved by moritz
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others having an uproarious good time at the Monastery: (9)
As of 2015-10-09 11:56 GMT
Find Nodes?
    Voting Booth?

    Does Humor Belong in Programming?

    Results (240 votes), past polls