DBD::mysql does not supports disconnect_all

$_->disconnect for grep { UNIVERSAL::isa($_, 'DBI::db') } @{ +{DBI->installed_drivers()}->{mysql}->{ChildHandles} };

works.

Published: 2012-12-03(Mon) 03:20