Data::Model::Transaction - transaction manager for Data::Model
sub foo { my $is_die = shift; my $model = Your::Model->new; my $txn = $model->txn_scope; # start transaction my $row = $txn->lookup( user => 1 ); # $model->lookup doesn't work. $row->name('transaction name'); $txn->update( $row ); # update return if $is_die; # rollback if ($is_die) { $txn->rollback; # explicitly rollback return; } $txn->commit; # commit } foo(1); # rollback foo(0); # commit
lookup, lookup_multi, get, get_multi, set, replace, set_multi, update, update_direct, delete, delete_direct, delete_multi and txn_scope and txn_begin derived from DataModel are not usable temporarily.
When you use these methods, please carry out via the instance which txn_scope returns.
Data::Model
Kazuhiro Osawa <yappo <at> shibuya <döt> pl>
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
1 POD Error
The following errors were encountered while parsing the POD:
Non-ASCII character seen before =encoding in '<döt>'. Assuming UTF-8
To install Data::Model, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Data::Model
CPAN shell
perl -MCPAN -e shell install Data::Model
For more information on module installation, please visit the detailed CPAN module installation guide.