1use strict; 2 3use lib qw(lib ../lib); 4 5use warnings FATAL => 'all'; 6 7use Apache::TestRun (); 8 9package MyTest; 10 11use vars qw(@ISA); 12@ISA = qw(Apache::TestRun); 13 14#subclass new_test_config to add some config vars which will 15#be replaced in generated config, see t/conf/extra.conf.in 16 17#'make test' runs -clean by default, so to actually see the replacements: 18#perl t/TEST apxs ... 19#cat t/conf/extra.conf 20#perl t/TEST -clean 21 22sub new_test_config { 23 my $self = shift; 24 25 $self->{conf_opts}->{authname} = 'gold club'; 26 $self->{conf_opts}->{allowed_users} = 'dougm sterling'; 27 28 return $self->SUPER::new_test_config; 29} 30 31sub bug_report { 32 my $self = shift; 33 34 print <<EOI; 35+-----------------------------------------------------+ 36| To report problems please refer to the SUPPORT file | 37+-----------------------------------------------------+ 38EOI 39} 40 41MyTest->new->run(@ARGV); 42 43