1 package ExtUtils::Command::MM;
7 use vars qw($VERSION @ISA @EXPORT);
10 @EXPORT = qw(test_harness);
15 ExtUtils::Command::MM - Commands for the MM's to use in Makefiles
19 perl -MExtUtils::Command::MM -e "function" files...
24 B<FOR INTERNAL USE ONLY!> The interface is not stable.
26 ExtUtils::Command::MM encapsulates code which would otherwise have to
27 be done with large "one" liners.
29 They all read their input from @ARGV unless otherwise noted.
31 Any $(FOO) used in the examples are make variables, not Perl.
37 test_harness($verbose, @test_libs);
39 Runs the tests on @ARGV via Test::Harness passing through the $verbose
40 flag. Any @test_libs will be unshifted onto the test's @INC.
42 @test_libs are run in alphabetical order.
47 require Test::Harness;
50 $Test::Harness::verbose = shift;
53 unshift @INC, map { File::Spec->rel2abs($_) } @_;
54 Test::Harness::runtests(sort { lc $a cmp lc $b } @ARGV);