Obtain Location of .pm in Use

mlong has asked for the wisdom of the Perl Monks concerning the following question:

Is there a way to, at runtime, determine the path of the module currently in use? I've completely removed a .pm file from my working directory yet the script that uses it is still managing to find it. In other words, 'use modulename;' is working even though the file doesn't exist. This is being called from a CGI. Any ideas? Thanks. -Matt

Comment on Obtain Location of .pm in Use

Replies are listed 'Best First'.
Re: Obtain Location of .pm in Use by FunkyMonk (Bishop) on Aug 29, 2007 at 22:11 UTC
`%INC` maintains a hash of (module filename relative to directories in @INC) => (full path to module file). ie, on my system, I get `$VAR1 = { 'warnings/register.pm' => '/usr/share/perl/5.8/warnings/regi +ster.pm', ...` [download] from `use Data::Dumper; print Dumper \%INC` That should tell you where perl is finding your module.	[reply] [d/l] [select]
Re^2: Obtain Location of .pm in Use by mlong (Sexton) on Aug 30, 2007 at 16:51 UTC
Thanks for your help. That was exactly what I needed. -Matt	[reply]
Re: Obtain Location of .pm in Use by kyle (Abbot) on Aug 30, 2007 at 01:42 UTC
FunkyMonk++ For more information about `%INC`, see perlvar. For more ways to find the location of a module, see Perl One Liner to Check Location of a Module. Here's another one, off the top of my head: `sub filename_of { my ( $package ) = @_; $package =~ s{::}{/}g; $package .= '.pm'; return $INC{$package}; }` [download]	[reply] [d/l] [select]
Re^2: Obtain Location of .pm in Use by Anonymous Monk on Aug 30, 2007 at 08:36 UTC
`C:\>perldoc -l CGI C:\Perl\lib\CGI.pm` [download]	[reply] [d/l]