Given an array of module names, you can use UNIVERSAL::require to check for their presence:

require UNIVERSAL::require;

my @modules_to_check = qw(Net::IP Net::CIDR List::BinarySearch);
for my $module (@modules_to_check) {
 $module->require or warn "$module failed to load\n";
}
[download]