$Dbh = DBI->connect($DbConnectionInfo,$DbUserid,$DbPasswd);

##</code><code>##

my $dbh = DBI->connect($DbConnectionInfo,$DbUserid,$DbPasswd, { RaiseError => 1 });

##</code><code>##

$dbh = DBI->connect($dsn, $user, $password,
                    { RaiseError => 1, AutoCommit => 0 });

##</code><code>##

$Sth = $Dbh->prepare("SELECT RegNum FROM $DbUsers ORDER BY RegNum DESC LIMIT 1") or die "Can't prepare: ", $dbh->errstr;