File Coverage

blib/lib/WebService/Kramerius/API4/Rights.pm
Criterion Covered Total %
statement 9 12 75.0
branch n/a
condition n/a
subroutine 3 4 75.0
pod 1 1 100.0
total 13 17 76.4


line stmt bran cond sub pod time code
1             package WebService::Kramerius::API4::Rights;
2              
3 2     2   249711 use strict;
  2         4  
  2         79  
4 2     2   11 use warnings;
  2         4  
  2         108  
5              
6 2     2   12 use base qw(WebService::Kramerius::API4::Base);
  2         5  
  2         1243  
7              
8             our $VERSION = 0.02;
9              
10             sub rights {
11 0     0 1   my ($self, $opts_hr) = @_;
12              
13 0           $self->_validate_opts($opts_hr, ['actions', 'pid']);
14              
15 0           return $self->_get_data($self->{'library_url'}.'search/api/v5.0/rights'.
16             $self->_construct_opts($opts_hr));
17             }
18              
19             1;
20              
21             __END__