Help for this page
sub db_keepalive { # if connection is dead if(!$dbh->ping) { ... or die $DBI::errstr; } }