Your script identifies every single module installed, ExtUtils::Installed (part of ExtUtils::MakeMaker) shows only the version of the module containing the modules... ahem, there is a little confusion here with the use of the word 'module', at least for me :) Here is the code I used:

use ExtUtils::Installed;

my ($inst) = ExtUtils::Installed->new();
my (@modules) = $inst->modules();

foreach (@modules) {
  print $_, ' v', $inst->version($_), "\n";
}
[download]

The main difference is that ExtUtils::Installed relies on the use of .packlist file.

Ciao, Valerio

Yes I understood you :-). In our group we do a lot of installing modules straight from source safe. Also from ppm and also by hand, and also by patching existing modules (and changing their version numbers accordingly). So looking at .packlist doesnt help much.

Anyway, TMTOWTDI. :-)

Thanks for the heads up about this module, apparently pfaut found it more interesting than the script... :-)

--- demerphq
my friends call me, usually because I'm late....

Not entirely. I'm running SuSE 7.2 which came with perl 5.005-003 (ugh!). It uses perl for some management tasks so I can't replace its installation with a newer one manually without figuring out what modules it has installed. It doesn't have ExtUtils::Installed installed.

I'm trying to upgrade my /usr/local/perl installation from 5.6.1 to 5.8.0 but need to figure out what all I've installed. Unfortunately, I haven't kept track of that as well as I should have. If I get the energy to bring it to the point where I can run the SuSE stuff off the 5.8.0 installation, I'll need the script but ExtUtils::Installed should at least get my stuff running.

Thanks for the assistance to all who responded.