#!/opt/bin/perl -w
print "running $0 in Perl $]\n";

my $result = eval "use CGI; 1";
if ($result) {
  print "CGI loaded\n";
} else {
  print "CGI failed\n";
}
print "$@\n";

$result = eval "use HTML::Template; 1";
if ($result) {
  print "Tmplt loaded\n";
} else {
  print "Tmplt failed\n";
}
print "$@\n";

#!/opt/bin/perl -w
print "running $0 in Perl $]\n";
for ( qw( CGI
         HTML::Template ) )
{
    print eval "require $_"
             ? "$_ ok\n"
             : "$_ failed: $@\n"
}

print "This is diotalevi's idea\n";
print "running $0 in Perl $]\n";
print "starting FOR loop\n";
foreach qw(
	CGI
	Data::Dumper;
	Dumpvalue;
	File::Find;
	Time::localtime;

	CGI::Application;
	Excel::Template;
	HTML::Template;
	PDF::Template;
        ) {
#print "ending FOR loop, starting PRINT EVAL\n";
    print eval "require $_"
             ? "$_ ok\n"
             : "$_ failed: $@\n"
}

print "ending PRINT EVAL\n";
#
#