Beefy Boxes and Bandwidth Generously Provided by pair Networks
P is for Practical
 
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 examining the Monastery: (15)
As of 2014-09-30 13:19 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    How do you remember the number of days in each month?











    Results (369 votes), past polls