André Warnier wrote:
In a similat setup, I successfuly use my ($self, $r) = @_;
Colin Wetherbee wrote:
PerlAccessHandler JetSet::Handler->AccessHandler PerlResponseHandler JetSet::Handler->ResponseHandler
The only down-side is that (AFAICR) it is creating a new object for each request - my handler is quite expensive to set up, so I have a persistent object and use method handlers like this:
package My::Handlers; $My::Handlers::Persistent=My::Handlers->new(); sub response_handler { my ($self,$r)[EMAIL PROTECTED]; .... } sub fixup_handler { my ($self,$r) = @_; .... } and apache config: PerlResponseHandler $My::Handlers::Persistent->response_handler PerlFixupHandler $My::Handlers::Persistent->fixup_handler cheers John