my $dir = '../files/lib/site/Collections'; opendir($dir) || die $!; my @modules = map { s/\.pm// } File::Spec->no_upwards(readdir($dir)); closedir($dir); for my $module (@modules) { use site::Collections::$module; }