1# please insert nothing before this line: -*- mode: cperl; cperl-indent-level: 4; cperl-continued-statement-offset: 4; indent-tabs-mode: nil -*-
2package TestAPR::status;
3
4# Testing APR::Status
5
6use strict;
7use warnings FATAL => 'all';
8
9use Apache::Test;
10
11use Apache2::Const -compile => 'OK';
12
13use TestAPRlib::status;
14
15sub handler {
16    my $r = shift;
17
18    my $num_of_tests = TestAPRlib::status::num_of_tests();
19    plan $r, tests => $num_of_tests;
20
21    TestAPRlib::status::test();
22
23    Apache2::Const::OK;
24}
25
26
27
281;
29