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',
      }
  );

Data::Model::Mixin

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.