Beefy Boxes and Bandwidth Generously Provided by pair Networks
Don't ask to ask, just ask
 
PerlMonks  

Re: (Golf) JAPH?

by MeowChow (Vicar)
on May 17, 2001 at 05:08 UTC ( #81138=note: print w/replies, xml ) Need Help??


in reply to (Golf) JAPH?

Hmm... not very portable, but:
perl -042e'print((`$^Xdoc -qj`)[1])'
   MeowChow                                   
               s aamecha.s a..a\u$&owag.print

Replies are listed 'Best First'.
Re: Re: (Golf) JAPH?
by bobione (Pilgrim) on May 17, 2001 at 14:10 UTC
    ...and not really shorter :

    die"Just Another Perl Hacker\n"
    perl -042e'print((`$^Xdoc -qj`)[1])'

    BobiOne KenoBi ;)

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://81138]
help
Chatterbox?
[1nickt]: ping from pm-cb-g
[choroba]: pong from the same
[choroba]: One of my favourites

How do I use this? | Other CB clients
Other Users?
Others making s'mores by the fire in the courtyard of the Monastery: (12)
As of 2017-10-18 12:29 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    My fridge is mostly full of:

















    Results (244 votes). Check out past polls.

    Notices?