Eric.
File::Find may already be installed.
-----Original Message-----
From: Jaimee Spencer [mailto:[EMAIL PROTECTED]
Sent: Wednesday, March 26, 2003 10:20 AM
To: 'Eric Walker'; [EMAIL PROTECTED]
Subject: RE: INFO PLEASE
Hello, Eric.
Copy and paste the below code and try it out. You will need the
File::Find module installed.
Regards,
Jaimee
#!/usr/bin/perl -w
# list all of the perl modules installed
use strict;
use File::Find ;
for (@INC) { find(\&modules,$_) ; }
sub modules
{
if (-d && /^[a-z]/) { $File::Find::prune = 1 ; return }
return unless /\.pm$/ ;
my $fullPath = "$File::Find::dir/$_";
$fullPath =~ s!\.pm$!!;
$fullPath =~ s#/(\w+)$#::$1# ;
print "$fullPath \n";
}
-----Original Message-----
From: Eric Walker [mailto:[EMAIL PROTECTED]
Sent: Wednesday, March 26, 2003 10:05 AM
To: [EMAIL PROTECTED]
Subject: INFO PLEASE
how can I see where modules are installed no matter if they are personal or
come with perl
also how can I tell what functions are available for them.
Thanks
