À moins que vous ne prévoyiez d'abandonner Apache::DBI, la réponse est un non ferme, car Apache::Remplacement de DBI ne fait vraiment rien :
# overload disconnect
{
package Apache::DBI::db;
no strict;
@ISA=qw(DBI::db);
use strict;
sub disconnect {
my $prefix = "$$ Apache::DBI ";
Apache::DBI::debug(2, "$prefix disconnect (overloaded)");
1;
}
;
}