package My::DBI;
use base qw/Class::DBI/;

My::DBI->set_db(...