"Fossies" - the Fresh Open Source Software Archive

Member "mod_perl-2.0.11/t/response/TestAPR/status.pm" (5 Oct 2019, 514 Bytes) of package /linux/www/apache_httpd_modules/mod_perl-2.0.11.tar.gz:


As a special service "Fossies" has tried to format the requested source page into HTML format using (guessed) Perl source code syntax highlighting (style: standard) with prefixed line numbers and code folding option. Alternatively you can here view or download the uninterpreted source code file. See also the last Fossies "Diffs" side-by-side code changes report for "status.pm": 2.0.8_vs_2.0.9.

    1 # please insert nothing before this line: -*- mode: cperl; cperl-indent-level: 4; cperl-continued-statement-offset: 4; indent-tabs-mode: nil -*-
    2 package TestAPR::status;
    3 
    4 # Testing APR::Status
    5 
    6 use strict;
    7 use warnings FATAL => 'all';
    8 
    9 use Apache::Test;
   10 
   11 use Apache2::Const -compile => 'OK';
   12 
   13 use TestAPRlib::status;
   14 
   15 sub 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 
   28 1;