I am unable to set the value of AutoCommit, RaiseError, or PrintError.
The following code...
$attr_ref->{RaiseError} = $self->{dbh}->{RaiseError};
$attr_ref->{PrintError} = $self->{dbh}->{PrintError};
$attr_ref->{AutoCommit} = $self->{dbh}->{AutoCommit};
$self->{dbh}->{RaiseError} = 1;
$self->{dbh}->{PrintError} = 0;
$self->{dbh}->{AutoCommit} = 0;
...gives me this output:
DBI::db=HASH(0x12dd470) trace level set to 0x0/1 (DBI @
0x0/214748364800) in DBI 1.58-ithread (pid 12248)
<- FETCH('RaiseError')= 1 at DBLayer.pm line 108
<- FETCH('PrintError')= 1 at DBLayer.pm line 109
<- FETCH('AutoCommit')= 1 at DBLayer.pm line 110 # these
three are OK
<- STORE('RaiseError' 1)= 1 at DBLayer.pm line 111
<- STORE('PrintError' 0)= 1 at DBLayer.pm line 112
<- STORE('AutoCommit' 0)= 1 at DBLayer.pm line 113 # these three
seem wrong
Notice the funky syntax in the last three lines. Why are the 1s and 0s
inside of the parens of STORE? Indeed, checking their values
immediately after this shows that all three vars are still set to 1;
my changes did not take effect.
This seems like a bug in DBI, but surely others would have found it?
I just upgraded to 1.58 from 1.54, and see the same problem in both
versions. Any ideas would be appreciated. Maybe I could turn on more
verbose DBI output?
Z
