Data::Model::Mixin::FindOrCreate - add find_or_create method
use Data::Model::Mixin modules => ['FindOrCreate'];
$model->find_or_create(
tablename => key => {
field1 => 'value',
field2 => 'value',
}
);
$model->find_or_create(
tablename => [qw/ key1 key2 /] => {
field1 => 'value',
field2 => 'value',
}
);
# using unique index, but not use normal index
$model->find_or_create(
tablename => { unique_idx => 'key' } => {
field1 => 'value',
field2 => 'value',
}
);
$model->find_or_create(
tablename => { unique_idx => [qw/ key1 key2 /] } => {
field1 => 'value',
field2 => 'value',
}
);
Kazuhiro Osawa <yappo <at> shibuya <doet> pl>
This library is free software; you can redistribute it and/or modify it under
the same terms as Perl itself.
Hey! The above document had some coding errors, which are explained
below:
- Around line 82:
- Non-ASCII character seen before =encoding in '<doet>'. Assuming
UTF-8