view release on metacpan or  search on metacpan

Build.PL  view on Meta::CPAN

       include => do {local $/; open FH, 't/config.incl' or die $!; <FH>});
  
  $class = $class->subclass
    (
     code => sprintf(<<'     EOF', Module::Build->cwd, $params{port}),
       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', "%s/t/httpd.conf");
	 
	 $ENV{PORT} = %s;  # Used by the test scripts
	 eval { $self->SUPER::ACTION_test };
	 warn $@ if $@;
	 
	 $self->do_system("kill `cat t/httpd.pid`");
       }
     EOF