connect has died on RaiseError since 0.91

use strict;
use warnings;

use DBI;

my $dbh = DBI->connect('dbi:Oracle:xxxReal_databasename', 'xxxReal_use
+r', 'bad_pasword', {
  PrintError => 0,
  RaiseError => 1,
});


print "Got Here\n";

$dbh->disconnect();

OUTPUT:
> ./tst
DBI connect('XXXXX','XXXXX',...) failed: ORA-01017: invalid username/p
+assword; logon denied (DBD ERROR: OCISessionBegin) at ./tst line 8
[download]

Though you have to be careful about (so maybe it is best to add the "or die" regardless)...(and I say this because I've done nearly this, and not yet learned from my mistake):

use strict;
use warnings;

use DBI;

my $dbh = DBI->connect('dbi:Oracle:xxxReal_databasename', 'xxxReal_use
+r', 'bad_pasword', {
  PrintError => 0,
  RaizeError => 1,
});

print "Got Here\n";

$dbh->disconnect();

OUTPUT:
> ./tst
Got Here
Can't call method "disconnect" on an undefined value at ./tst line 16.
[download]