| 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 |
|
259
|
0 |
0 |
unless $res->{'items'} |
|
294
|
0 |
0 |
if (my $images = delete $item->{'images'}) |
|
298
|
0 |
0 |
if (my $files = delete $item->{'files'}) |
|
303
|
0 |
0 |
if (my $publisher = delete $item->{'publisher'}) |
|
304
|
0 |
0 |
if (ref $publisher) |
|
305
|
0 |
0 |
if (my $f = $publisher->{'facet'}) |
|
312
|
0 |
0 |
if (my $authors = delete $item->{'authors'}) |
|
314
|
0 |
0 |
if (ref $authors) { } |
|
316
|
0 |
0 |
if $_->{'text'} |
|
317
|
0 |
0 |
if (my $f = $_->{'facet'}) |
|
329
|
0 |
0 |
unless my $ref = ref $v |
|
330
|
0 |
0 |
if $ref eq 'HASH' |
|
331
|
0 |
0 |
unless ref $v eq 'ARRAY' |
|
333
|
0 |
0 |
if (my $f = $_->{'facet'}) |
|
339
|
0 |
0 |
if keys %facets |
|
368
|
0 |
0 |
unless my $ni = $self->native_item(@_) |
|
402
|
0 |
0 |
unless my $isbn = shift() |
|
407
|
0 |
0 |
unless ($response->is_success) |
|
410
|
0 |
0 |
if (my $message = $data->{'message'}) |
|
411
|
0 |
0 |
if $message =~ /already exists/iu |
|
418
|
0 |
0 |
if (my $holds = $self->holds(@_)) |
|
420
|
0 |
0 |
if ($i->{'isbn'} eq $isbn) |
|
430
|
0 |
0 |
if ($content_type and $content_type =~ m[application/json]u) |
|
431
|
0 |
0 |
if (my $data = eval {
do {
from_json($content)
}
}) |
|
441
|
0 |
0 |
unless my $isbn = shift() |
|
446
|
0 |
0 |
unless ($response->is_success) |
|
449
|
0 |
0 |
if (my $message = $data->{'message'}) |
|
450
|
0 |
0 |
if $message =~ /not exists|expired/iu |
|
485
|
0 |
0 |
unless my $isbn = shift() |
|
488
|
0 |
0 |
if (my $checkouts = $self->checkouts(@_)) |
|
490
|
0 |
0 |
if ($i->{'isbn'} eq $isbn) |
|
498
|
0 |
0 |
if $days |
|
504
|
0 |
0 |
unless my $checkouts = $self->checkouts(@_) |
|
506
|
0 |
0 |
if ($i->{'isbn'} eq $isbn) |
|
516
|
0 |
0 |
unless my $isbn = shift() |
|
524
|
0 |
0 |
unless my $checkouts = $self->checkouts(@_) |
|
526
|
0 |
0 |
if ($i->{'isbn'} eq $isbn) |
|
536
|
0 |
0 |
unless my $isbn = shift() |
|
541
|
0 |
0 |
unless ($response->is_success) |
|
544
|
0 |
0 |
if (my $message = $data->{'message'}) |
|
545
|
0 |
0 |
if $message =~ /not exists|expired/iu |
|
580
|
0 |
0 |
unless my $query = shift() |
|
581
|
0 |
0 |
unless my $media = shift() |
|
584
|
0 |
0 |
unless grep {$_ eq $media;} @MEDIA |
|
586
|
0 |
0 |
unless grep {$_ eq $query;} @NAMED_QUERY |
|
603
|
0 |
0 |
unless my $facets = shift() |
|
604
|
0 |
0 |
unless ref $facets |
|
607
|
0 |
0 |
if (ref $facets eq 'ARRAY') |
|
626
|
0 |
0 |
unless my $isbn = shift() |
|
634
|
0 |
0 |
unless my $isbn = shift() |
|
670
|
0 |
0 |
unless my $url = shift() |
|
678
|
0 |
0 |
unless my $data = shift() |