view release on metacpan or  search on metacpan

t/reload.t  view on Meta::CPAN

use strict;
use warnings FATAL => 'all';

use Apache::Test;
use Apache::TestUtil;
use Apache::TestRequest;
use File::Spec::Functions qw(catfile tmpdir);

Apache::TestRequest::user_agent(keep_alive => 1);

plan tests => 3, need 'HTML::HeadParser';

my $test_file = catfile qw(Reload Test.pm);

my $location = '/reload';

my @tests = qw(const prototype simple subpackage);

my $header = join '', <DATA>;