File Coverage

blib/lib/WebService/Kramerius/API4/VC.pm
Criterion Covered Total %
statement 9 14 64.2
branch n/a
condition n/a
subroutine 3 5 60.0
pod 0 2 0.0
total 12 21 57.1


line stmt bran cond sub pod time code
1             package WebService::Kramerius::API4::VC;
2              
3 2     2   247365 use strict;
  2         5  
  2         84  
4 2     2   9 use warnings;
  2         3  
  2         113  
5              
6 2     2   11 use base qw(WebService::Kramerius::API4::Base);
  2         4  
  2         1004  
7              
8             our $VERSION = 0.02;
9              
10             sub pid {
11 0     0 0   my ($self, $pid) = @_;
12              
13 0           return $self->_get_data($self->{'library_url'}.'search/api/v5.0/vc/'.$pid);
14             }
15              
16             sub vc {
17 0     0 0   my ($self, $opts_hr) = @_;
18              
19 0           $self->_validate_opts($opts_hr, ['langCode', 'sort']);
20              
21 0           return $self->_get_data($self->{'library_url'}.'search/api/v5.0/vc'.
22             $self->_construct_opts($opts_hr));
23             }
24              
25             1;