Fred Moyer wrote:
On Fri, Nov 23, 2012 at 2:18 PM, André Warnier <a...@ice-sa.com> wrote:
Fred Moyer wrote:
You might want to take a look at a mod_perl based proxy module I wrote
- https://metacpan.org/module/Apache2::Proxy
It was used in conjunction with Perlbal and a couple other tricks, but
was pretty speedy given the crude nature of how I implemented it.
No offense intended, Fred, but without much of a documentation, this is bit
above my level. I have trouble even understanding where it fits in.
None taken, you're quite right, this needs (more) documentation. It
was open sourced when still in rough form. I'll send a ping when I get
it cleaned up and 0.05 released. Anyway, here's the basic way I used
it. Torsten's solution is probably technically more adept, but I
couldn't do what I needed to using filtering, so I had to write this.
<Location />
SetHandler modperl
PerlHeaderParserHandler Apache2::Const::OK
PerlAccessHandler Apache2::Const::OK
PerlAuthenHandler Apache2::Const::OK
PerlAuthzHandler Apache2::Const::OK
PerlTypeHandler Apache2::Const::OK
PerlFixupHandler Apache2::Const::OK
PerlResponseHandler My::Proxy->handler
</Location>
package My::Proxy;
use base 'Apache2::Proxy';
sub handler {
my ($r, $class) = @_;
# examine request to see if it needs to be modified
# if not, pass to Apache2::Proxy
return $class->SUPER::handler($r);
# else fixup the request as needed.
}
Ok, get it, thanks.
All-in-one, as a substitute for mod_proxy.
I will have a second look now.