File Coverage

blib/lib/OpenSearch/Index/GetDangling.pm
Criterion Covered Total %
statement 18 22 81.8
branch n/a
condition 0 3 0.0
subroutine 6 7 85.7
pod 0 1 0.0
total 24 33 72.7


line stmt bran cond sub pod time code
1             package OpenSearch::Index::GetDangling;
2 4     4   30 use strict;
  4         11  
  4         168  
3 4     4   22 use warnings;
  4         11  
  4         290  
4 4     4   25 use Moo;
  4         7  
  4         33  
5 4     4   1746 use Types::Standard qw(InstanceOf);
  4         10  
  4         43  
6 4     4   14752 use feature qw(signatures);
  4         12  
  4         644  
7 4     4   47 no warnings qw(experimental::signatures);
  4         10  
  4         681  
8              
9             with 'OpenSearch::Parameters::Index::GetDangling';
10              
11             has '_base' => (
12             is => 'rw',
13             isa => InstanceOf['OpenSearch::Base'],
14             required => 1,
15             );
16              
17 0     0 0   sub execute($self) {
  0            
  0            
18 0   0       my $res = $self->_base->_get( $self, [ '_dangling', ( $self->index_uuid // () ) ] );
19             }
20              
21              
22             1;