File Coverage

blib/lib/Teng/Plugin/FindOrCreate.pm

Criterion	Covered	Total	%
statement	13	13	100.0
branch	2	2	100.0
condition			n/a
subroutine	4	4	100.0
pod	1	1	100.0
total	20	20	100.0

package Teng::Plugin::FindOrCreate;
use strict;
use warnings;
use utf8;

our @EXPORT = qw/find_or_create/;

sub find_or_create {
    my ($self, $table, $args) = @_;
    my $row = $self->single($table, $args);
    return $row if $row;
    $self->insert($table, $args)->refetch;
}

1;

__END__

=head1 NAME

Teng::Plugin::FindOrCreate - provide find_or_create method for your Teng class.

=head1 NAME

    package MyDB;
    use parent qw/Teng/;
    __PACKAGE__->load_plugin('FindOrCreate');

    package main;
    my $db = MyDB->new(...);
    my $row = $db->find_or_create('user',{name => 'lestrrat'});

=head1 DESCRIPTION

This plugin provides find_or_create method.

=head1 METHODS

=over 4

=item $row = $db->find_or_create($table[, \%args]])

I<$table> table name for counting

I<\%args> : HashRef for row data.

=back