Re: Surprising DBD::Oracle error raised

[John D Groenveld]

In message <cafwsco-tqp5yycpptawzqkkyhz6qjs3d_g+yv5r9x9apdbm...@mail.gmail.com>
, David Nicol writes:
>the error message claimed I hadn't executed the statement.

Where is your DBI_TRACE?
I can't reproduce.

John
groenv...@acm.org

use strict;
use DBI;

my $dbh = DBI->connect( "dbi:Oracle:", "scott", "tiger",
                       { RaiseError => 1 } );
my $sth = $dbh->prepare( qq{
 SELECT 'FOO','BAR' FROM dual
} );
$sth->execute;
my ( $foo ) = $sth->fetchrow_array;
if ($sth->fetch) {
   warn "should not enter";
}
$sth->finish;
$dbh->disconnect;