DBIx :: Class를 사용하여 열을 증가시키는 방법?

Question

일부 원시 DBI 호출을 DBIx :: Class로 변환하려고합니다. 때때로 다음과 같은 것을 실행합니다 :

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

DBIx :: Class가 정확하게 이런 종류의 쿼리를 실행하도록 할 방법이 있습니까? 나는 다음과 같은 일을하고 싶지 않습니다 :

여러 프로세스가 같은 일을하려고 할 때 거기에 경쟁 조건이 있기 때문입니다.

데이터베이스 수준에서 어떤 종류의 잠금을 사용하면 문제가 발생할 수 있지만 원래 쿼리를 사용하는 것보다 나에게 나빠질 것 같습니다. 기본적으로 나는 이것을하기 위해 DBIC를 사용하는 깨끗한 방법이 있는지 알고 싶습니다. 아니면 여기에서 원시 DBI 호출을 계속 사용해야 만하는지 알고 싶습니다.

Answer 1

를 사용하여 솔루션과 같은 트랜잭션 코드의 당신의 블록을 포장하지만 update와 update_all을 대체 할 수

는

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

이것은 하나의 UPDATE 문에서 발생합니다. (설명 :.. update_all DBIC 트리거 같은 것들을 포함 된 ResultSet의 모든 행에 update를 호출하여 작동하므로 먼저 행을 가져 update을는 ResultSet에있다가 베어 SQL의 UPDATE를 실행) 나는 당신이 의미 가정

Answer 2

DBIx :: Class :: Storage :: TxnScopeGuard 도움말을 사용합니까? 당신은 @ ThisSuitIsBlackNot의 코멘트에서이

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