Beefy Boxes and Bandwidth Generously Provided by pair Networks
Syntactic Confectionery Delight
 
PerlMonks  

He's Making a List, Checking it Twice...

by davido (Archbishop)
on Dec 25, 2003 at 05:10 UTC ( #316962=obfuscated: print w/ replies, xml ) Need Help??

What this obfu lacks in cunning obfuscation it makes up for in generosity, for it keeps on giving in the spirit of this holiday season.

Enjoy the insight normally reserved only for Santa and his elves. Happy Holidays!

my(@g,@b);while(my$l=<DATA>){chomp$l;my@s=split/\|/,$l;for(@s){my$ty= chop;tr/a-zA-Z/n-za-mN-ZA-M/;my$r_a=($ty=~/G/i)?\@g:\@b;push@{$r_a},$ _}}GIFT_GIVING:{print"--- Santa's List Reader ---\nSanta, enter chi", "ld's name, or [Quit] to quit.\n";;my$n="";;;until("All gifts are"=~/ given/x){$n=<STDIN>;chomp$n;last if$n=~/^Quit/i;my($h,$f)=(length($n) %2>0)?("good",$g[rand(@g)]):("bad",$b[rand(@b)]);print"$n was $h th", "is year. Give $f.\n\n\n\nEnter child's name, Santa, or [Quit] to ", "quit.\n"}unless("Grinch"=~/Stole Christmas/){print"\n\n\n\nSanta, ", "you can't quit yet; kids need their toys.\n\n";redo GIFT_GIVING}} __DATA__ Cynl FgngvbaG|FpbbgreG|QbyyG|Creyzbaxf GfuegG|Fuval arj abgrobbxG jbeyq crnprG|Wnpxvr Puna IvqrbG|GevplpyrG|Sver RatvarG|ChcclG Ebggra CbgngbB|Qbt cbbcB|-- ibgrfB|gur syhB|yhzc bs pbnyB|jbezfB ebggra rttfB|ohpxrg bs ibzvgB|Wnpxvr Puna IvqrbB

This one isn't about "figuring it out". Just have fun. Merry Christmas everyone. :)


Dave

Comment on He's Making a List, Checking it Twice...
Download Code
Re: He's Making a List, Checking it Twice...
by nimdokk (Vicar) on Dec 25, 2003 at 14:46 UTC
    Fun, except for a couple of niggling points: 1) What's wrong with Jackie Chan video's? :-) 2) It wouldn't let me quit and 3) When I entered "Grinch" it just gave me the routine good kid/bad kid message. 2 and 3 were the only real things I noticed that didn't seem to work right on Perl 5.8.0 on Windows 98 SE.


    "Ex libris un peut de tout"
      All of the quirks you mentioned were intentional.
      • Santa couldn't possibly deliver toys to all the boys and girls if he were allowed to quit.
      • Jackie Chan... I dunno why I thought that was funny, but I allowed that gift to go to both good and bad children.
      • Santa would never allow the Grinch to steal Christmas.

      It's just the programming equivilant of a doodle.

      Merry Christmas!


      Dave

        LOL, OK :-)
        I didn't see the Jackie Chan videos going to both, but I guess it depends on which videos we're talking about. I mean Bad kids deserve Fantasy Mission Force, good kids, perhaps Mr. Nice Guy or something :-D. Anyhow, lotta fun regardless.


        "Ex libris un peut de tout"

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others rifling through the Monastery: (3)
As of 2014-10-26 00:30 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    For retirement, I am banking on:










    Results (149 votes), past polls