try this:

#!/usr/bin/perl
use ExtUtils::Installed;
my $i = ExtUtils::Installed->new();
my (@modules) = $i->modules();
for $m (sort @modules) {
  print "$m ", $i->version($m), $/;
}
[download]

or perldoc perllocal