File Coverage

blib/lib/Catmandu/Store/RKD/API/Name.pm
Criterion Covered Total %
statement 10 12 83.3
branch n/a
condition n/a
subroutine 4 4 100.0
pod n/a
total 14 16 87.5


line stmt bran cond sub pod time code
1             package Catmandu::Store::RKD::API::Name;
2              
3 2     2   5484 use Moo;
  2         2  
  2         11  
4 2     2   917 use LWP::UserAgent;
  2         30607  
  2         45  
5              
6 2     2   10 use Catmandu::Sane;
  2         3  
  2         13  
7              
8 2     2   836 use Catmandu::Store::RKD::API::Search;
  0            
  0            
9              
10             has name_to_search => (is => 'ro', required => 1);
11              
12             has results => (is => 'lazy');
13              
14             sub _build_results {
15             my $self = shift;
16             my $template = 'http://opendata.rkd.nl/opensearch/artists/eac-cpf?q=naamdeel:(%s)';
17             my $url = sprintf($template, $self->name_to_search);
18             my $search = Catmandu::Store::RKD::API::Search->new(url => $url);
19             return $search->results;
20             }
21              
22             1;