- 追加された行はこの色です。
- 削除された行はこの色です。
- Perl-DBIC/SELECT詳細/トランザクション へ行く。
- Perl-DBIC/SELECT詳細/トランザクション の差分を削除
* トランザクション [#v8746993] my $m_rs = $schema->model('Member'); my $coderef = sub { foreach my $login_id (@login_ids) { $m_rs->create( { login_id => $login_id, status_flg => 1, } ); } }; my $rs; eval { $rs = $schema->txn_do($coderef); }; if ($@) { die "DBエラー" if ($@ =~ /Rollback failed/); } ** 参考 [#pd74f98d] http://search.cpan.org/perldoc?DBIx::Class::Storage