Instead of rolling your own DBI singletonn you might want to look at Ima::DBI.

Class::Singleton is another useful module.

gav^