BPP::DBI->db_Main->disconnect();
[download]

Note that this will probably work with the default implementation of db_Main, but strictly speaking Class::DBI shouldn't know what db_Main does as long as it returns a DBI handle, so it might open up a new database connection for every call, or use a pool or whatever.