line |
true |
false |
branch |
149
|
0 |
9 |
unless ($input_type and $valid_input_types{$input_type}) |
150
|
0 |
0 |
defined $input_type ? : |
158
|
9 |
0 |
if ($input_type eq 'isbn') { } |
|
0 |
0 |
elsif ($input_type eq 'lccn') { } |
|
0 |
0 |
elsif ($input_type eq 'oclc') { } |
166
|
4 |
5 |
unless (defined $input_value_clean and length $input_value_clean) |
186
|
1 |
4 |
unless (defined $have_time_hi_res) |
195
|
5 |
0 |
if ($type eq 'isbn') { } |
|
0 |
0 |
elsif ($type eq 'lccn') { } |
|
0 |
0 |
elsif ($type eq 'oclc') { } |
206
|
4 |
1 |
if (_get_time() < $next_lookup_ok_time) |
214
|
5 |
0 |
if ($result->is_success) { } |
227
|
0 |
9 |
if (not defined $isbn_input) { } |
|
0 |
9 |
elsif (ref $isbn_input and eval {
do {
$isbn_input->isa('Business::ISBN')
}
}) { } |
|
0 |
9 |
elsif (not length $isbn_input) { } |
240
|
5 |
4 |
if ($isbn_object) |
251
|
0 |
0 |
if (not defined $lccn_input) { } |
|
0 |
0 |
elsif (not length $lccn_input) { } |
258
|
0 |
0 |
if (not $lccn =~ /\d/) { } |
270
|
0 |
0 |
if (not defined $oclc_input) { } |
|
0 |
0 |
elsif (not length $oclc_input) { } |
278
|
0 |
0 |
if (not $oclc =~ /\d/) { } |
289
|
1 |
4 |
unless ($_default_ua) |
301
|
0 |
18 |
unless (defined $have_time_hi_res) |
304
|
18 |
0 |
if ($have_time_hi_res) { } |
313
|
0 |
4 |
if (_get_time() >= $time_to_sleep_until) { } |
316
|
0 |
4 |
unless (defined $have_time_hi_res) |
320
|
4 |
0 |
if ($have_time_hi_res) { } |