Beefy Boxes and Bandwidth Generously Provided by pair Networks
go ahead... be a heretic
 
PerlMonks  

Re: When -w and use strict aren't enough...

by bl0rf (Pilgrim)
on Nov 05, 2003 at 01:16 UTC ( [id://304597]=note: print w/replies, xml ) Need Help??


in reply to When -w and use strict aren't enough...

I know not all the intricacies of Perl but I will
suggest this:

Snarf in your script from another script. The second
script will declare any sub it comes across:

if( $line =~ m!sub\s+(\S+){ eval "sub $1 {}" }
Then the second script will store every sub called
in an array, it will check %main:: and CORE:: to see
whether the subroutines have been, or will be, declared
at any point in your original script.

I hope my advice helps.
-Jacob
Eat Perl, live well.
My site

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://304597]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others musing on the Monastery: (3)
As of 2024-03-28 18:16 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found