On Thu, Apr 29, 2010 at 04:02:05PM -0700, Fred Moyer wrote:
> On Thu, Apr 29, 2010 at 4:39 AM, Tim Bunce <tim.bu...@pobox.com> wrote:
> > On Wed, Apr 28, 2010 at 11:25:14PM -0400, Adam Prime wrote:
> >> Maybe you could try doing the push_handler for the ChildExitHandler
> >> when the ChildInitHandler executes? Just a shot in the dark.
> >
> > Umm, but how to I get the ChildInitHandler handle to use the right perl
> > interpreter?
>
> I just tried to setup a test case but I don't have perl configured
> with ithreads.
>
> Can you do something like this, since each vhost servername is tied to
> that perl intepreter? (warning, untested code)
>
> sub child_exit {
> my $vhost_servername = shift;
>
> my $s = Apache2::ServerUtil->server;
> return unless $s->hostname eq $vhost_servername;
>
> DB::_finish();
> }
>
> $s->push_handlers(PerlChildExitHandler => \&child_exit($s->server_hostname );
The \&child_exit($s->server_hostname) syntax wouldn't work but I'll try
something along those lines. Thanks.
Tim.
