NAME¶
HTTP::Proxy::BodyFilter::complete - A filter that passes on a complete body or
nothing
SYNOPSIS¶
use HTTP::Proxy;
use HTTP::Proxy::BodyFilter::simple;
use HTTP::Proxy::BodyFilter::complete;
my $proxy = HTTP::Proxy->new;
# pass the complete response body to our filter (in one pass)
$proxy->push_filter(
mime => 'text/html',
response => HTTP::Proxy::BodyFilter::complete->new,
response => HTTP::Proxy::BodyFilter::simple->new(
sub {
my ( $self, $dataref, $message, $protocol, $buffer ) = @_;
# some complex processing that needs
# the whole response body
}
);
);
$proxy->start;
DESCRIPTION¶
The HTTP::Proxy::BodyFilter::complete filter will ensure that the next filter in
the filter chain will only receive complete message bodies (either request or
response).
It will store the chunks of data as they arrive, only to pass the
entire
message body after the whole message has been received by the proxy.
Subsequent filters is the chain will receive the whole body as a big piece of
data.
CAVEAT EMPTOR¶
This consumes memory and time.
Use with caution, otherwise your client will timeout, or your proxy will run out
of memory.
Also note that all filters after "complete" are still called when the
proxy receives data: they just receive empty data. They will receive the
complete data when the filter chain is called for the very last time (the
$buffer parameter is "undef"). (See the documentation of
HTTP::Proxy::BodyFilter for details about the $buffer parameter.)
METHOD¶
This filter defines two methods, called automatically:
- filter()
- Stores the incoming data in memory until the last moment and passes empty
data to the subsequent filters in the chain. They will receive the full
body during the last round of filter calls.
- will_modify()
- This method returns a false value, thus indicating to the system
that it will not modify data passing through.
AUTHOR¶
Philippe "BooK" Bruhat, <book@cpan.org>.
THANKS¶
Thanks to Simon Cozens and Merijn H. Brandt, who needed this almost at the same
time. ";-)"
COPYRIGHT¶
Copyright 2004-2013, Philippe Bruhat.
LICENSE¶
This module is free software; you can redistribute it or modify it under the
same terms as Perl itself.