| line |
true |
false |
branch |
|
91
|
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) |
|
100
|
0 |
4 |
if $@ or not $mech->success or not $mech->content |
|
106
|
0 |
4 |
if $html =~ /Sorry your search.*?did not return any results|This book is currently unavailable/is |
|
116
|
0 |
4 |
unless $$data{'author'} |
|
119
|
0 |
4 |
unless $$data{'publisher'} |
|
126
|
0 |
4 |
unless $$data{'description'} |
|
129
|
12 |
0 |
if $$data{$_} |
|
135
|
0 |
4 |
unless defined $data |
|
139
|
4 |
52 |
unless defined $$data{$_} |