if (!$already_in_a_transaction) {
    local $dbh->{AutoCommit} = 0;
}