File Coverage

blib/lib/Role/TinyCommons/Collection/FindItem.pm
Criterion Covered Total %
statement 3 6 50.0
branch 0 2 0.0
condition n/a
subroutine 1 2 50.0
pod 1 1 100.0
total 5 11 45.4


line stmt bran cond sub pod time code
1             package Role::TinyCommons::Collection::FindItem;
2              
3 2     2   331591 use Role::Tiny;
  2         5067  
  2         13  
4              
5             our $AUTHORITY = 'cpan:PERLANCAR'; # AUTHORITY
6             our $DATE = '2024-01-16'; # DATE
7             our $DIST = 'Role-TinyCommons-Collection'; # DIST
8             our $VERSION = '0.010'; # VERSION
9              
10             ### required methods
11              
12             requires 'find_item';
13              
14             ### provided methods
15              
16             sub has_item {
17 0     0 1   my ($self, $item) = @_;
18 0           my @results = $self->find_item(item => $item);
19 0 0         @results ? 1:0;
20             }
21              
22             1;
23             # ABSTRACT: The find_item() interface
24              
25             __END__