Help for this page
if ($dbh->ping()) { $sth = $dbh->prepare('SELECT ...'); ... else { $dbh = DBI::connect(...); }