[root@rhel6 ~]# cat list.pl
#!/usr/bin/perl
use strict;
use ExtUtils::Installed;
my $inst= ExtUtils::Installed->new();
my @modules = $inst->modules();
foreach(@modules)
{
my $ver = $inst->version($_) || "???";
printf("%-12s -- %s\n", $_, $ver);
}
exit;
[root@rhel6 ~]# perl list.pl
DBD::Oracle -- 1.74
DBI -- 1.627
Perl -- 5.10.1
