| line |
true |
false |
branch |
|
92
|
0 |
4 |
if not $ean or length $isbn == 13 and $isbn ne $ean or length $isbn == 10 and $isbn ne $self->convert_to_isbn10($ean) |
|
101
|
0 |
4 |
if $@ or not $mech->success or not $mech->content |
|
112
|
1 |
3 |
unless $link |
|
116
|
0 |
3 |
if $@ or not $mech->success or not $mech->content |
|
122
|
0 |
3 |
if $html =~ /Sorry, we couldn't find any matches for/is |
|
132
|
3 |
0 |
if $$data{'publisher'} |
|
133
|
3 |
0 |
if $$data{'pubdate'} |
|
149
|
0 |
9 |
unless $$data{$key} |
|
153
|
2 |
1 |
if $$data{'author'} |
|
154
|
3 |
0 |
if ($$data{'description'}) |
|
165
|
0 |
3 |
unless defined $data |
|
170
|
2 |
40 |
unless defined $$data{$_} |