Re: Closing DB handler with PerlCleanupHandler

[Timour Ezeev]

On Wed, 10 Nov 2004, Batara Kesuma wrote:
[...]
## httpd.conf
<FilesMatch "\.pl$">
 SetHandler perl-script
 PerlResponseHandler ModPerl::Registry
 PerlOptions +ParseHeaders
 PerlCleanupHandler MyApache::Cleanup
 Options +ExecCGI
</FilesMatch>
## MyApache::Cleanup.pm
package MyApache::Cleanup;
use strict;
sub handler {
   my ($r) = @_;
   our $dbh;
   if ($dbh) {
       print STDERR "Got ya!!";
       $dbh->disconnect();
   }
   return 200;
}
1;
I can't get $dbh from module that is called by PerlCleanupHandler. $dbh
is created by scripts in ModPerl::Registry. How can I disconnect 'our
$dbh' created by scripts within ModPerl::Registry in PerlCleanupHandler?
BTW, our() has a package scope and thus you are referring to different $dbh here 
IMHO.

Regards,
- Timour
--
Timour Ezeev
Pivotal Dynamics
[EMAIL PROTECTED]
V: 305.406.9904
F: 305.406.9689
--
Report problems: http://perl.apache.org/bugs/
Mail list info: http://perl.apache.org/maillist/modperl.html
List etiquette: http://perl.apache.org/maillist/email-etiquette.html