opendir (DIR,"/path/to/dir") or die "Can't readdir: $!";
foreach my $module (grep /\.pm$/, readdir(DIR)) {
  require "/path/to/dir/$module";
  $module =~ s/\.pm$//;
  import $module;
}
closedir DIR;