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'

Comment on Just Another JAPH
Download Code
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 the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others romping around the Monastery: (12)
As of 2015-09-04 21:22 GMT
Find Nodes?
    Voting Booth?

    My preferred temperature scale is:

    Results (148 votes), past polls