#!/usr/bin/perl
use strict;
use warnings;

# "Quick-and-dirty" version using eval BLOCK

foreach my $mod (qw(CGI Test::Simple Foo::Bomb Test::More)) {
	if (eval "require $mod; 1;") {
		print "Module $mod loaded ok\n";
	} else {
		print "Could not load $mod. Error Message: $@\n";
	}
}