use CPAN;
my @required_modules = qw(CGI XML::Parser HTML::Template);
foreach my $module ( @required_modules ) {
   print "Checking for $module";
   eval "require $module";
   if($@) {
      print "failed\n";
      print "$module does not seem to be present!  I'll install it now.\n";
      CPAN::Shell->install($module);
   }  
}