This looks like a bug in your DBD::Oracle but in any case you shouldn't be using RaiseError if you plan on testing the return codes.

Setting RaiseError as you do will cause an exception to be thrown on all errors (except I think errors during the connect() call). That means that $dbh->prepare should either throw an exception or return a valid statement handle.

Also, testing with mysql throws an error only when you execute the query object. Oracle might behave differently ofcourse: 

use strict;
use warnings;
use DBI;
my $dbh = DBI->connect( "dbi:mysql:test", "root", "", {AutoCommit => 0
+, RaiseError => 1, PrintError => 0}) || die "Can't connect to databas
+e: $DBI::errstr";

my $qry = $dbh->prepare(q{ select BAD__column from users where id=1254
+3256 }) or die "Prepare bad: $DBI::errstr";

$qry->execute();

[download]
output: 
DBD::mysql::st execute failed: Table 'test.users' doesn't exist at tes
+t.pl line 8.
Issuing rollback() for database handle being DESTROY'd without explici
+t disconnect().

[download]
"What should it profit a man, if he should win a flame war, yet lose his cool?"

In reply to Re: $DBI::errstr is always undef by Joost
in thread $DBI::errstr is always undef by spivey3587

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.