| line |
true |
false |
branch |
|
94
|
0 |
1 |
if not $ean or length $isbn == 13 and $isbn ne $ean or length $isbn == 10 and $isbn ne $self->convert_to_isbn10($ean) |
|
107
|
0 |
1 |
if $@ or not $mech->success or not $mech->content |
|
113
|
0 |
1 |
if $html =~ /Sorry. We did not find any results|Sorry, we could not find what you were looking for/is |
|
139
|
1 |
0 |
if $$data{'depth'} |
|
140
|
1 |
0 |
if $$data{'width'} |
|
141
|
1 |
0 |
if $$data{'height'} |
|
142
|
0 |
1 |
if $$data{'weight'} |
|
145
|
0 |
3 |
unless $$data{$_} |
|
150
|
1 |
0 |
if ($$data{'author'}) |
|
158
|
0 |
1 |
unless defined $data |
|
163
|
1 |
14 |
unless defined $$data{$_} |