t/01load.t

   1 use strictures 1;
   2 use Test::More;
   3 use Test::SharedFork;
   4 use IO::All;
   5
   6 foreach my $module (grep $_->name =~ /\.pm$/, io->dir('lib')->all_files(0)) {
   7   unless (fork) {
   8     ok(eval { require $module }, "${module} loaded ok");
   9     warn $@ if $@;
  10     exit 0;
  11   }
  12   waitpid(-1, 0);
  13 }
  14
  15 done_testing;