Beefy Boxes and Bandwidth Generously Provided by pair Networks
Do you know where your variables are?
 
PerlMonks  

Centiperl!

by japh (Friar)
on Jan 18, 2002 at 05:45 UTC ( #139703=obfuscated: print w/ replies, xml ) Need Help??

Insert coins to play.
#!/usr/bin/perl -lw for $sale ( # SCORE 907 HI 287185 ', . ', ', . Y ', ', y Y ', ', . Y ', ', y Y ', ', . ', ', . Y ', ', . Y ', ', M Y ', ', Y ', ', Y ', ', Y ', ', Y ', ', ', ', Y ', ', Ymmmmmm ', ', @mmm Y ', ', Y ', ', ', ', Y mm* m@ ', ', Y ! ', ', Y ! ', ', Y ! ', ', Y ', ' ^ Y ' ){$_.=chr index # CENTIPERL! ($sale,'Y')+90} # s!Y(.)! \u$1!g; # LIVES: 4 s!^ |SCORE|!!g; # CREDITS: 1 print

Comment on Centiperl!
Download Code
Re: Centiperl!
by belg4mit (Prior) on Jan 18, 2002 at 05:51 UTC
    damn. got me excited to have centipede written in perl

    ++ for orginiality, -- for ease of deobfuscation :-P.

    --
    perl -pe "s/\b;([st])/'\1/mg"

      That's where the 'insert coins' part comes in...

      I admit the code is straightforward. I relied on spatial representation, a red herring, and (as it turns out) folks' assumption that i'm capable of packing a working video game into 65 characters :)

Re: Centiperl!
by ellem (Hermit) on Jan 22, 2002 at 01:57 UTC
    Hey I think this thing is some kind of virus! The game never loads and it says something about breaking into systems!
    :)
    --
    lmoran@wtsg.com
    There's more than one way to do it, just don't use my way.

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others contemplating the Monastery: (8)
As of 2014-08-20 10:48 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The best computer themed movie is:











    Results (110 votes), past polls