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

RTFM

by srawls (Friar)
on Jun 03, 2001 at 06:31 UTC ( #85265=obfuscated: print w/ replies, xml ) Need Help??

This script scans the perl documentation to find what it needs. I got this idea from this thread. Here we go ...
split$",`man$"$^Xop`,$^F;splice@_,$(; $j=(`man$"$^Xfunc`=~/(?<=program. )(.{4})/g)[$-- --$^F]; $a=(`man$"$^Xtoc`=~/(?<=5)(.{7})/g)[215]; $p.=substr$_[$[],$_+$^F,$(for(++$....$]); $h=(`man perlfaq1`=~/(?<=$^X$")(.{6})/g)[10]; print "$j $a $p $h\n";
Update:Changed first line so left side would read "japh"

The 15 year old, freshman programmer,
Stephen Rawls

Comment on RTFM
Download Code
Re: RTFM
by Vynce (Friar) on Jun 03, 2001 at 14:31 UTC
    what version & OS are you running? this doesn't work for me.
      Version 5.005 and Sun Solaris. Two of my variables are a little platform dependent, try putting this at the top of the script and see if it works:
      $a="1 1"; $b="1 1"; *(=*a; *)=*b;
      Also, it depends on your version of Perl and the documentation. If it still doesn't work, I'll see what I can do.

      The 15 year old, freshman programmer,
      Stephen Rawls

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others chilling in the Monastery: (7)
As of 2014-07-31 21:47 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    My favorite superfluous repetitious redundant duplicative phrase is:









    Results (253 votes), past polls