$dbh->disconnect;
  $dbh = undef;
  exit;