no strict; my @required = ( File::Basename, File::Copy, File::Find ); use strict; my @missing; foreach (@required) { eval { require }; push @missing, $_ if $@; }