Select Code to Download

sub do_transaction {
                my $class = shift;
...
                        die $commit_error;
                }
        }

                local $class->db_Main->{ AutoCommit };

$dbh->{AutoCommit} = 0