From: Bernd Prager
Date: December 10 2001 8:46am
Subject: list of open DB handles?
List-Archive: http://lists.mysql.com/perl/1561
Message-Id: <021701c18157$1bf82670$7102a8c0@prager.homeip.net>
MIME-Version: 1.0
Content-Type: text/plain;
	charset="iso-8859-1"
Content-Transfer-Encoding: 7bit

Hi,

I would like to write a kind of general cleanup subroutine for the 
database handles when my program ends. Something like:
$SIG{__DIE__} = $SIG{__INT__} = $SIG{__QUIT__} = \&cleanup.

Is there a way to determine all the open DB and statement handles?
I don't want to code the specific handle 'finish' and 'disconnect'
statements every time again.
Or does somebody has another smart idea how to do that?

Thanks,
-- Bernd