Beefy Boxes and Bandwidth Generously Provided by pair Networks
Pathologically Eclectic Rubbish Lister
 
PerlMonks  

Re: checking for all packages

by philipbailey (Curate)
on May 16, 2014 at 19:50 UTC ( [id://1086384] : note . print w/replies, xml ) Need Help??


in reply to checking for all packages

There's no doubt some more sophisticated way of doing this, but I'd probably just try to require each package in turn in a string eval. This should give you the idea:

#!/usr/bin/perl use strict; use warnings; my @packages = qw/ Net::IP Net::CIDR List::BinarySearch /; for my $package (@packages) { eval "require $package"; if ($@) { print "Couldn't find package '$package'\n"; } else { print "Found package '$package'\n"; } }