hmm.. there seem to be a lot of complicated answers here.. it's really quite simple.. just move the set_db call, it doesn't have to be in your CDBI modules at all..

eg in your main script or handler, before you make any calls to CDBI modules..

my @db_info = get_dbinfo();
My::DBI->set_db('Main', @db_info);
[download]