Perl 数据库连接

些更新直接写到数据库里， 而是要程序通过 $dbh->commit 来使数据真正地写到数据库里， 或 $dbh->rollback 来回滚刚才的操作。2、 通过$dbh->begin_work()语句来开始一个事务这种方式就不需要在连接数据库的时候设置 AutoCommit ＝ 0 。 可以一次数据库连接进行多次事务操作， 不用每一次事务的开始都去连接一次数据库。$rc = $dbh->begin_work or die $dbh->errstr;





#





#





#





#





#





#





#





#





#





#





#





#





#





#





#





#





#





#





#





#





#





#





#这里执行一些 SQL 操作





#





#





#





#





#





#





#





#





#





#





#





#





#





#





#





#





#





#





#





#





#$dbh->commit;





# 成功后操作-----------------------------$dbh->rollback;





# 失败后回滚断开数据库连接如果我们需要断开数据库连接，可以使用 disconnect API：$rc = $dbh->disconnect or warn $dbh->errstr;