sybperl-l Archive

From: "Kiriakos Georgiou" <kirig at library dot nrl dot navy dot mil>
Subject: rollback
Date: Jul 12 2001 6:03PM

I use DBD::Sybase and I noticed that once in a while (6 out 430,000
transactions) my rollbacks appear to be failing.  I currently do:

eval { $dbh->rollback };
$@ and print "rollback failed: ", $@, "\n";

I can't think of a reason why a rollback would fail, but in an attempt
to force the rollback I am thinking of modifying the above to:

do {
  eval { $dbh->rollback };
} while($@);


Any thoughts?

thanks,
Kiriakos Georgiou