Select Code to Download

use DBI;            # Load the DBI module

...
  or warn "Error disconnecting: $DBI::errstr\n";

exit;