Beefy Boxes and Bandwidth Generously Provided by pair Networks
XP is just a number

Re: robustly list any Perl code's module dependencies

by simonflk (Pilgrim)
on Oct 06, 2002 at 14:00 UTC ( #203163=note: print w/replies, xml ) Need Help??

in reply to robustly list any Perl code's module dependencies

This is a nice trick, but it won't work if the script or or any modules that are loaded do a use lib or unshift @INC

Something like this should work, as long as require is not overriden elsewhere:

package ShowDependencies; use strict; *CORE::GLOBAL::require = \&show_require; sub show_require (;$) { my $module = shift; print STDERR $module, $/; my $retval = eval "CORE::require( $module )"; die $@ if $@; return $retval; } 1;

There is also a module (Module::Dependency) on the CPAN that builds a list of dependencies.

update: added use strict

-- simonflk

Log In?

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

How do I use this? | Other CB clients
Other Users?
Others lurking in the Monastery: (10)
As of 2016-10-25 21:34 GMT
Find Nodes?
    Voting Booth?
    How many different varieties (color, size, etc) of socks do you have in your sock drawer?

    Results (330 votes). Check out past polls.