eval {
  local $dbh->{AutoCommit} = 0;
};
$self->{_can_do_transactions} = $@ ? 0 : 1;

##</code><code>##

$self->{_can_do_transactions} = eval {
  local $dbh->{AutoCommit} = 0;
  1
};