Как увеличить столбец с помощью DBIx :: Class?

Question

Я пытаюсь преобразовать некоторые необработанные вызовы DBI в DBIx :: Class. Я иногда натыкаться что-то вроде:

UPDATE 'foo' SET bar = bar + 1 WHERE ... 

Есть ли способ действительно есть DBIx :: Class выполнить именно такой запрос? Я не хочу, чтобы сделать что-то вроде:

$row->update({ bar => $row->bar() + 1 }); 

, потому что это состояние гонки есть если несколько процессов пытаются сделать то же самое.

Я мог бы обойти это с помощью какой-то блокировки на уровне базы данных, но мне это кажется хуже, чем просто с использованием исходного запроса. В основном я просто хочу знать, есть ли чистый способ использования DBIC для этого или если я просто буду продолжать использовать необработанные вызовы DBI здесь.

Answer 1

использование раствор от @ ThisSuitIsBlackNot своего комментария, но заменить update_all с update:

$rs->search(...)->update({ 
    bar => \'bar + 1', 
}); 

Это приведет к в одном операторе UPDATE. (Пояснение:.. update_all работает по призванию update на каждой строке в ResultSet, включая такие вещи, как DBIC триггеров, поэтому он должен первым получать строки update на ResultSet выполняет баребонов SQL UPDATE)

Answer 2

Будет использовать DBIx :: Class :: Storage :: TxnScopeGuard help? Вы можете обернуть блок кода в транзакции, как этого

my $guard = $schema->txn_scope_guard; 
# your increment 
$guard->commit;