why is rollback necessary

Observe the following code :

$dbh->begin_work;

eval {
do_some_db_stuff();
$dbh->commit;
};

if ($@) {
eval { $dbh->rollback(); };
} else {
print "committed\n";
}

Is the $dbh->rollback() necessary? if $dbh->commit fails
then the data never got committed, so what is the point of
calling $dbh->rollback ? Is the transaction kept open
otherwise ?


Thanks

--
MySQL Perl Mailing List
For list archives: http://lists.mysql.com/perl
To unsubscribe: http://lists.mysql.com/perl?unsub=gcdmp-msql-mysql-modules@m .gmane.org