Of course, I should have tried out print ref $r;, but my brain wouldn't allow me to see the obvious.
Ok, that proves that mod_perl is a bigger black box to me than I originally thought.
So, I guess the question I should be asking is: what is the best way to accomplish what I'm trying to do?
I'm beginning to believe that subclassing the request is not the best way to do it, as the $r object I've been passing around in every mod_perl project I've ever worked on is not, in fact, an Apache::Request.
If I do something like this:
sub handler{
my $apr = shift;
my $r = $apr->request;
# Do something.
return OK;
}
I can pass around my modified request object, but it will be an actual request rather than an instance of the Apache object.I still get an Apache object. Now that I've created my Apache::Request subclass, how do I use it?
Have any links to good articles discussing mod_perl internals that might be of assistance? I've gone beyond the books and links I know about, I'm affraid.
Thanks for the answer!
UPDATE: Struk out my wrongness. |