The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Apache::Test - Test.pm wrapper with helpers for testing Apache

SYNOPSIS

    use Apache::Test;

DESCRIPTION

Apache::Test is a wrapper around the standard Test.pm with helpers for testing an Apache server.

FUNCTIONS

plan

This function is a wrapper around Test::plan:

    plan tests => 3;

just like using Test.pm, plan 3 tests.

If the first argument is an object, such as an Apache::RequestRec object, STDOUT will be tied to it. The Test.pm global state will also be refreshed by calling Apache::Test::test_pm_refresh. For example:

    plan $r, tests => 7;

ties STDOUT to the request object $r.

If there is a last argument that doesn't belong to Test::plan (which expects a balanced hash), it's used to decide whether to continue with the test or to skip it all-together. This last argument can be:

  • a SCALAR

    the test is skipped if the scalar has a false value. For example:

      plan tests => 5, 0;

    But this won't hint the reason for skipping therefore it's better to use have():

      plan tests => 5,
          have 'LWP',
               { "perl >= 5.7.3 is required" => sub { $] >= 5.007003 } };

    see have() for more info.

  • an ARRAY reference

    have_module() is called for each value in this array. The test is skipped if have_module() returns false (which happens when at least one C or Perl module from the list cannot be found).

  • a CODE reference

    the tests will be skipped if the function returns a false value. For example:

        plan tests => 5, \&have_lwp;

    the test will be skipped if LWP is not available

All other arguments are passed through to Test::plan as is.

ok

Same as Test::ok, see Test.pm documentation.

sok

Allows to skip a sub-test, controlled from the command line. The argument to sok() is a CODE reference or a BLOCK whose return value will be passed to ok(). By default behaves like ok(). If all sub-tests of the same test are written using sok(), and a test is executed as:

  % ./t/TEST -v skip_subtest 1 3

only sub-tests 1 and 3 will be run, the rest will be skipped.

skip

Same as Test::skip, see Test.pm documentation.

test_pm_refresh

Normally called by Apache::Test::plan, this function will refresh the global state maintained by Test.pm, allowing plan and friends to be called more than once per-process. This function is not exported.

Functions that can be used as a last argument to the extended plan():

      plan tests => 5, &have_http11;

    Require HTTP/1.1 support.

    have_ssl

      plan tests => 5, &have_ssl;

    Require SSL support.

    Not exported by default.

    have_lwp

      plan tests => 5, &have_lwp;

    Require LWP support.

    have_cgi

      plan tests => 5, &have_cgi;

    Requires mod_cgi or mod_cgid to be installed.

    have_apache

      plan tests => 5, have_apache 2;

    Requires Apache 2nd generation httpd-2.x.xx

      plan tests => 5, have_apache 1;

    Requires Apache 1st generation (apache-1.3.xx)

    See also have_min_apache_version().

    have_min_apache_version

    Used to require a minimum version of Apache.

    For example:

      plan tests => 5, have_min_apache_version("2.0.40");

    requires Apache 2.0.40 or higher.

    have_apache_version

    Used to require a specific version of Apache.

    For example:

      plan tests => 5, have_apache_version("2.0.40");

    requires Apache 2.0.40.

    have_perl

      plan tests => 5, have_perl 'iolayers';
      plan tests => 5, have_perl 'ithreads';

    Requires a perl extension to be present, or perl compiled with certain capabilities.

    The first example tests whether PerlIO is available, the second whether:

      $Config{useithread} eq 'define';

    have_module

      plan tests => 5, have_module 'CGI';
      plan tests => 5, have_module qw(CGI Find::File);
      plan tests => 5, have_module ['CGI', 'Find::File', 'cgid'];

    Requires Apache C and Perl modules. The function accept a list of arguments or a reference to a list.

    In case of C modules, depending on how the module name was passed it may pass through the following completions:

    1 have_module 'proxy_http.c'

    If there is the .c extension, the module name will be looked up as is, i.e. 'proxy_http.c'.

    2 have_module 'mod_cgi'

    The .c extension will be appended before the lookup, turning it into 'mod_cgi.c'.

    3 have_module 'cgi'

    The .c extension and mod_ prefix will be added before the lookup, turning it into 'mod_cgi.c'.

    have

      plan tests => 5,
          have 'LWP',
               { "perl >= 5.8.0 is required" => ($] >= 5.008)          },
               { "not Win32"                 => sub { $^O eq 'MSWin32' },
                 "foo is disabled"           => \&is_foo_enabled,
               },
               'cgid';

    have() is more generic function which can impose multiple requirements at once. All requirements must be satisfied.

    have()'s argument is a list of things to test. The list can include scalars, which are passed to have_module(), and hash references. If hash references are used, the keys, are strings, containing a reason for a failure to satisfy this particular entry, the valuees are the condition, which are satisfaction if they return true. If the value is a scalar it's used as is. If the value is a code reference, it gets executed at the time of check and its return value is used to check the condition. If the condition check fails, the provided (in a key) reason is used to tell user why the test was skipped.

    In the presented example, we require the presense of the LWP Perl module, mod_cgid, that we run under perl >= 5.7.3 on Win32.

    It's possible to put more than one requirement into a single hash reference, but be careful that the keys will be different.

    Also see plan().

Apache::TestToString Class

The Apache::TestToString class is used to capture Test.pm output into a string. Example:

    Apache::TestToString->start;

    plan tests => 4;

    ok $data eq 'foo';

    ...

    # $tests will contain the Test.pm output: 1..4\nok 1\n...
    my $tests = Apache::TestToString->finish;

1 POD Error

The following errors were encountered while parsing the POD:

Around line 461:

=over should be: '=over' or '=over positive_number'

You can't have =items (as at line 467) unless the first thing after the =over is an =item