File Coverage

blib/lib/Role/TinyCommons/Collection/SelectItems.pm

Criterion	Covered	Total	%
statement	3	9	33.3
branch	0	4	0.0
condition			n/a
subroutine	1	3	33.3
pod	2	2	100.0
total	6	18	33.3

package Role::TinyCommons::Collection::SelectItems;

use Role::Tiny;

our $AUTHORITY = 'cpan:PERLANCAR'; # AUTHORITY
our $DATE = '2024-01-16'; # DATE
our $DIST = 'Role-TinyCommons-Collection'; # DIST
our $VERSION = '0.010'; # VERSION

### required methods

requires 'select_items';

### provided methods

sub has_matching_item {
    my ($self, %args) = @_;
    my @results = $self->select_items(result_limit => 1, %args);
    @results ? 1:0;
}

sub select_first {
    my ($self, %args) = @_;
    my @results = $self->select_items(result_limit => 1, %args);
    @results ? $results[0] : undef;
}

1;
# ABSTRACT: The search_items() interface

__END__