$dbh->begin_work;
  #do my work;
$dbh->commit;