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