Beefy Boxes and Bandwidth Generously Provided by pair Networks
Clear questions and runnable code
get the best and fastest answer

Just Another JAPH

by Eimi Metamorphoumai (Deacon)
on Feb 03, 2005 at 19:19 UTC ( #427785=obfuscated: print w/replies, xml ) Need Help??

It's relatively simple and straightforward (compared to the usual fare here), but since it uses a technique I haven't seen anyone else use, I thought I'd post it here.
perl -le '$_=(split q,",,`$^Xdoc -q japh`)[1].".";y/pj/PJ/;print'

Replies are listed 'Best First'.
Re: Just Another JAPH
by ambrus (Abbot) on Feb 03, 2005 at 19:50 UTC

    I have done something similar in One-liner japh. Using perldoc -q is a nice trick that makes it short, and didn't occurr to me.

    Update: (this kind of thing is not easy to super-search to, is it?)

    Update: later, three other people have also found this japh idea: see Opere Citato Japh, JAPF, and Perl FAQ.

Log In?

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

How do I use this? | Other CB clients
Other Users?
Others chilling in the Monastery: (8)
As of 2017-09-22 12:24 GMT
Find Nodes?
    Voting Booth?
    During the recent solar eclipse, I:

    Results (262 votes). Check out past polls.