my $module = "CGI";
my $filename = $module;
$filename =~ s!::!/!g;
$filename .= ".pm";
require $filename
  or die "$module did not return a true value";
$module->import;