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


Reply via email to