A menos que você planeje abandonar o Apache::DBI, a resposta é um firme não, porque Substituição do Apache::DBI realmente não faz nada:
# 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;
}
;
}