use ExtUtils::Installed;
my $installed = ExtUtils::Installed->new();
print "and ...";
if (grep(/CGI::Session/,$installed->modules() )) {
	print "found it.";
} else {
	print "didn't find it.";
}
exit;

##</code><code>##

print "<p>Finding all installed modules...<br>\n";
my $installed2 = ExtUtils::Installed->new();
foreach my $module ($installed2->modules) {
  my $version = $installed2->version($module) || "<no version info>";
  print("Found module $module Version $version<br>\n");
}

##</code><code>##

Finding all installed modules...
Found module Perl Version 5.10.0
Script finished.