$dbh = DBI->connect($db_datasource, $db_user_name,
                    $db_password)
  or die("Could not connect!" . $DBI::errstr);