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

NAME

Test::Environment::Plugin::Apache2::Apache2::Filter - fake Apache2::Filter for Test::Environment

SYNOPSIS

    use Test::Environment qw{
        Apache2
    };
    
    my $filter = Apache2::Filter->new(
        'data' => \$data,
    );
    
    is(
        My::App:Apache2::Filter::handler($filter),
        Apache2::Const::OK,
    );
    is($$filter->r->pnotes('any_news'), 'no');

DESCRIPTION

Will populate Apache2::Filter namespace with fake methods that can be used for Apache2::Filter testing.

PROPERTIES

    ctx
    data
    max_buffer_size
    data_for_next_filter
    seen_eos

METHODS

new()

Filter object contructor.

read($bufer, $len)

Will put $len (or $self->max_bufer_size if smaller) characters from $self->data into the buffer.

print(@args)

Will append @args to the $self->data_for_next_filter.

TODO

        * implement sending/setting eos

AUTHOR

Jozef Kutej