Beefy Boxes and Bandwidth Generously Provided by pair Networks
Your skill will accomplish
what the force of many cannot

Glob in the JAPH

by Eily (Parson)
on Jun 17, 2013 at 23:00 UTC ( #1039485=obfuscated: print w/replies, xml ) Need Help??

This morning, the weather was quite warm and sunny, so I decided to take my bike to go to work. I didn't bother looking what it would be like in the evening. So I ended up in front of my computer, waiting for the rain to stop falling long enough for me to come back home, because I hadn't thought about taking a jacket. To pass the time, I made this:

($R,$B)=(q, another,,q( Perl hacker,),$a=Just);$, =$V;m;(.)\(\)?;;*V=$::{$1};$\=$V;BEGIN{$|;$_=\$:: {b};m;(.)\(\)?;;*V=$::{$1}}print @$_ for [$a,$b],

My favorite JAPHs are those where the printed text isn't already obvious in the code. So I could have added some encryption or something to this one, but I thought I should rather stick to one main concept (concept I stumbled upon by accident) and shape (quite literally) this script around it. I still used some other obfuscations here and there to prevent the whole script from being too obvious, and to make it fit in a rectangle.

It does not run under strict, and warnings may make it easier to understand.

Replies are listed 'Best First'.
Re: Glob in the JAPH
by Grimy (Pilgrim) on Jun 18, 2013 at 20:24 UTC

    Nice one (:

    I actually had to run it to understand where this B comes from.

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: obfuscated [id://1039485]
Approved by Athanasius
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others lurking in the Monastery: (2)
As of 2017-08-22 02:19 GMT
Find Nodes?
    Voting Booth?
    Who is your favorite scientist and why?

    Results (326 votes). Check out past polls.