Beefy Boxes and Bandwidth Generously Provided by pair Networks
Problems? Is your data what you think it is?
 
PerlMonks  

hello world

by jbware (Chaplain)
on Feb 15, 2004 at 21:08 UTC ( #329174=obfuscated: print w/ replies, xml ) Need Help??

package Earth;sub Greet{ %_=('Y','~');$_='$;=!(Middle Earth.age~~~<Eart~~~~~~~~~~~~~h .age)?!(defined$ti~~~~~~~~~~~mez~~~On e[2])?!(push@time~~~~~~~~~~~~~~~~Zone,loc ~altime())?rotation?~~~~~~~~~~~~~q~~?The Worl ~~d?:q:[\w]::q=[\~~~~~~~~~~~~~~~~~d~a-f]=:q?..~~ ~~~?:q:.:;"42b3d3~~~~~~~~~~~~~~~~~~~~~728656c6c6f6 ~~~~~0277f627c64672~~~~~~~~~~~~~~~~~~~~~b3072796e647 ~~~~~~~42b3b3rg7d"=Ym~~~~~~~~~~~~~~~~~~~\$;~~*\;p~~~~u ~~~~~~~~~sh@_,$&;bless~~~~~~~~~~~~~~~~~~~~~~~~~$c~~~~~~~ ~~~~~~~~~o~ntine~~~~~nt~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ ~~~~~~~~~~~~~s=\~~~~~~~$~~~~~~~~~~~~~~~~~~~~~~~pangaea~~~~ ~~~~~~~~~~~~~~~;{l~~~~~~~~~~~~~~~~~~~~~~~~~~~~ocal@_;local$; ~~~~~~~~~~~~~~~~~="o~~~~~~~~~~~~~~~~~~~~~~~~~cean";$^A=(defi ~~~~~~~~~~~~~~~~~~~n~~~~~~~~~~~~~~~~~~~~~~~~~ed$continents)? ~~~~~~~~~~~~~~~~~~~(vec(~~~~~~~~~~~~~~~~~~~~~~$;, YYsplit(\' ~~~~~~~~~~~~~~~~~\',${\$;}~~~~~~~~~~~~~~~~~~~~~~)%3,YYsplit( ~~~~~~~~~~~~~~~~q??,$;)**2-~~~~~~~~~~~~~~~~~~~~~~(($;=Ytr/oa ~~~~~~~~~~~~~~~~eiu//)**2))=~~~~~~~~~~~~~~~~~~~~~~=28160)?q: ~~~~~~~~~~~~~~~~~.::q?!?:\'?~~~~~~~~~~~~~~~~~~~~~~\';}$^A=Ys ~~~~~~~~~~~~~~~~:\Q.\E:pack(~~~~~~~~~~~~~~~~~~~~~~\'h*\',j ~~~~~~~~~~~~~~~~~oin(q(),~~~~~~~~~~~~~~~~~~~~~~~grep{$_= ~~~~~~~~~~~~~~~~~~Ym,$,,}~~~~~~~~~~~~~~~~~~~~~~~split(" ~~~~~~~~~~~~~~~~~",@_~~~~~~~~~~~~~~~~~~~~~~~~~~[0])) ~~~~~~~~~~~~~~~~):e~~~~~~~~~~~~~~~~~~~~~~~~~~~gexe ~~~~~~~~~~~~~~~;$d~~~~~~~~~~~~~~~~~~~~~~~~~~~="s ~~~~~~~~~~~~~~ort~~~~~~~~~~~~~~~~~~~~~~~~~~<= ~~~~~~~~~~~~>,~~~~~~~~~~~~~~~~~~~~~~~~~~YY ~~~~~~~~~~~@_~~~~~~~~~~~~~~~~~~~~~~~~ ~~~~~~~~~"~~~~~~~~~~~~~~~~~~~';; s,(~|\r|\n|\s),,g;s.Y.\x7e.g; eval};Greet;'the world';

Comment on hello world
Download Code
Re: hello world
by FordPrefect (Initiate) on Feb 16, 2004 at 09:06 UTC
    Wow, nice. I like.
Re: hello world
by pelagic (Curate) on Feb 16, 2004 at 09:11 UTC
    Well done, jbware!
    pelagic

    -------------------------------------
    I can resist anything but temptation.
Re: hello world
by Grygonos (Chaplain) on Feb 16, 2004 at 14:34 UTC
    Wow....just ... wow...you could make a poster out of that and sell quite a few i bet.

    Grygonos

      Nah, not a poster, a T-Shirt! ;)

      --
      b10m

      All code is usually tested, but rarely trusted.
        A T-Shirt of this would rock. And it'd save me the trouble of stapling multiple posters together to wear. :) Very cool script!
Re: hello world
by csuhockey3 (Curate) on Feb 16, 2004 at 19:33 UTC
    Wow -- that's unreal. Nice job!

    -CSUhockey3
Re: hello world
by makar (Novice) on Feb 17, 2004 at 04:53 UTC
    How mean, we beginners just figure out how to write the "hello world" script the normal way, and you come along as Mr. Fancypants and ruin our noobie fun! Thanks a lot!

    I kid of course, this is both a really cool script and a rather funny joke. Great work!
Re: hello world
by perliff (Monk) on Apr 16, 2009 at 08:23 UTC
    mr. jbware... this has to be the most interesting hello world i have ever seen in years... uff.. you have made my day... i am not a "hello world" freak, in that i am almost sick to death of looking at language books writing this 2 word incantation (if you will).. but this work of art you have created... wunderbar!
    "with perl on my side"

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others imbibing at the Monastery: (9)
As of 2014-12-23 03:30 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    Is guessing a good strategy for surviving in the IT business?





    Results (135 votes), past polls