use lib 'c:/tmp/test/' ; use testlib::testlib; Test::test() ; #### require testlib::mod1 ; require testlib::mod2 ; #### foreach ( <*.pm> ) { next if /testlib/ ; $_ =~ s/\.pm// ; my $val = "testlib::" . $_ ; eval "require $val" ; }
## require testlib::mod1 ; require testlib::mod2 ; ##
## foreach ( <*.pm> ) { next if /testlib/ ; $_ =~ s/\.pm// ; my $val = "testlib::" . $_ ; eval "require $val" ; }