my $dbh = DBI->connect( qw(DBI:vendor:database:host user pass), {RaiseError=>1}, );