line |
true |
false |
branch |
85
|
0 |
0 |
if (my $domain = $self->domain) |
86
|
0 |
0 |
unless $domain =~ /\./u |
91
|
0 |
0 |
if $ssl |
93
|
0 |
0 |
$ssl ? : |
99
|
0 |
0 |
unless my $action = shift() |
117
|
0 |
0 |
unless my $action = shift() |
144
|
0 |
0 |
unless my $facet = shift() |
152
|
0 |
0 |
unless my $query = shift() |
156
|
0 |
0 |
if $region |
163
|
0 |
0 |
unless my $url = shift() |
167
|
0 |
0 |
if $get_params |
174
|
0 |
0 |
unless $data |
221
|
0 |
0 |
if (my $query = delete $params->{'query'}) |
222
|
0 |
0 |
if ref $query |
225
|
0 |
0 |
if (my $page_size = delete $params->{'page_size'}) |
228
|
0 |
0 |
if (my $page_number = delete $params->{'page'}) |
229
|
0 |
0 |
unless $params->{'page-size'} |
232
|
0 |
0 |
if (my $sort = delete $params->{'sort'}) |
234
|
0 |
0 |
if (@$sa) |
239
|
0 |
0 |
if $d |
250
|
0 |
0 |
unless my $res = shift() |
256
|
0 |
0 |
if $domain |
258
|
0 |
0 |
unless $res->{'items'} |
293
|
0 |
0 |
if (my $images = delete $item->{'images'}) |
297
|
0 |
0 |
if (my $files = delete $item->{'files'}) |
302
|
0 |
0 |
if (my $publisher = delete $item->{'publisher'}) |
303
|
0 |
0 |
if (ref $publisher) |
304
|
0 |
0 |
if (my $f = $publisher->{'facet'}) |
311
|
0 |
0 |
if (my $authors = delete $item->{'authors'}) |
313
|
0 |
0 |
if (ref $authors) { } |
315
|
0 |
0 |
if $_->{'text'} |
316
|
0 |
0 |
if (my $f = $_->{'facet'}) |
328
|
0 |
0 |
unless my $ref = ref $v |
329
|
0 |
0 |
if $ref eq 'HASH' |
330
|
0 |
0 |
unless ref $v eq 'ARRAY' |
332
|
0 |
0 |
if (my $f = $_->{'facet'}) |
338
|
0 |
0 |
if keys %facets |
367
|
0 |
0 |
unless my $ni = $self->native_item(@_) |
401
|
0 |
0 |
unless my $isbn = shift() |
406
|
0 |
0 |
unless ($response->is_success) |
409
|
0 |
0 |
if (my $message = $data->{'message'}) |
410
|
0 |
0 |
if $message =~ /already exists/iu |
417
|
0 |
0 |
if (my $holds = $self->holds(@_)) |
419
|
0 |
0 |
if ($i->{'isbn'} eq $isbn) |
429
|
0 |
0 |
if ($content_type and $content_type =~ m[application/json]u) |
430
|
0 |
0 |
if (my $data = eval {
do {
from_json($content)
}
}) |
440
|
0 |
0 |
unless my $isbn = shift() |
445
|
0 |
0 |
unless ($response->is_success) |
448
|
0 |
0 |
if (my $message = $data->{'message'}) |
449
|
0 |
0 |
if $message =~ /not exists|expired/iu |
484
|
0 |
0 |
unless my $isbn = shift() |
487
|
0 |
0 |
if (my $checkouts = $self->checkouts(@_)) |
489
|
0 |
0 |
if ($i->{'isbn'} eq $isbn) |
497
|
0 |
0 |
if $days |
503
|
0 |
0 |
unless my $checkouts = $self->checkouts(@_) |
505
|
0 |
0 |
if ($i->{'isbn'} eq $isbn) |
515
|
0 |
0 |
unless my $isbn = shift() |
523
|
0 |
0 |
unless my $checkouts = $self->checkouts(@_) |
525
|
0 |
0 |
if ($i->{'isbn'} eq $isbn) |
535
|
0 |
0 |
unless my $isbn = shift() |
540
|
0 |
0 |
unless ($response->is_success) |
543
|
0 |
0 |
if (my $message = $data->{'message'}) |
544
|
0 |
0 |
if $message =~ /not exists|expired/iu |
579
|
0 |
0 |
unless my $query = shift() |
580
|
0 |
0 |
unless my $media = shift() |
583
|
0 |
0 |
unless grep {$_ eq $media;} @MEDIA |
585
|
0 |
0 |
unless grep {$_ eq $query;} @NAMED_QUERY |
602
|
0 |
0 |
unless my $facets = shift() |
603
|
0 |
0 |
unless ref $facets |
606
|
0 |
0 |
if (ref $facets eq 'ARRAY') |
625
|
0 |
0 |
unless my $isbn = shift() |
633
|
0 |
0 |
unless my $isbn = shift() |
669
|
0 |
0 |
unless my $url = shift() |
677
|
0 |
0 |
unless my $data = shift() |