package MyModuleBuilder; use Module::Build; @ISA = qw(Module::Build); sub ACTION_test { my $self = shift; $self->depends_on('build'); # Could be File::Spec-ified, but this is mostly a Unix module $self->add_to_cleanup(qw(t/httpd t/httpd.conf t/error_log)); $self->do_system('t/httpd', '-f', "/mnt/gmirror/ports/www/p5-Apache-SSI/work/Apache-SSI-2.19/t/httpd.conf"); $ENV{PORT} = 8228; # Used by the test scripts eval { $self->SUPER::ACTION_test }; warn $@ if $@; $self->do_system("kill `cat t/httpd.pid`"); } 1;