On Thu, Apr 10, 2008 at 11:15:30AM -0700, Douglas Wilson wrote:
> $dbh->trace(9);
> >  > ( $total ) = $dbh->selectrow_array( $sth, undef, $id );
> >  > ( $total ) = $dbh->selectrow_array( $sth, undef, $id );
> 
> >  A DBI trace should shed more light on it.

Thanks. I believe this was fixed in DBI 1.57 (svn rev 9639) June 2007

  Fixed XS versions of select*_*() methods to call execute()
    fetch() etc., with inner handle instead of outer.

Are you *certain* that that code is running with DBI 1.602?
Try adding a print of $DBI::VERSION.

If you are stuck on an old DBI version try something like this as
a workaround:

    sub DBI::st::DELETE { my ($h, $key) = @_; delete $h->{$key} }

Tim.

Reply via email to