my $dbh = DBI->connect('dsn', 'uid', 'pwd', {RaiseError => 1});