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