On Wed, Sep 04, 2002 at 01:36:25PM +0800, Liu Haifeng wrote:
> eval {
> $sth->bind_param( 1, @$_->[0], SQL_VARCHAR );
> $sth->bind_param( 2, @$_->[1], SQL_VARCHAR );
> $sth->bind_param( 3, @$_->[2], SQL_INTEGER );
> $sth->execute() || die "$DBI::errstr\n";
> $dbh->commit() || die "$DBI::errstr\n";
> };
>
> if( $@ ) {
> warn "Database error: $DBI::errstr\n";
change this line to:
warn "Database error: $@\n";
that will give you the error that cause the eval{} to exit, which is
hopefully more meaningful
but as a guess, the call to commit() is failing because AutoCommit
is on.
-tim
