my $dbh = DBI->connect(
  "DBI:ODBC:$databaseName",
  {
    AutoCommit => 0,
    RaiseError => 1
  }
)
  or die "cannot connect to Oracle!";

##</code><code>##

$dbh->commit;  # or call $dbh->rollback; to undo changes