| line |
true |
false |
branch |
|
97
|
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) |
|
107
|
2 |
2 |
if $@ or not $mech->success or not $mech->content |
|
113
|
1 |
1 |
unless $link |
|
117
|
0 |
1 |
if $@ or not $mech->success or not $mech->content |
|
134
|
2 |
1 |
unless @size |
|
135
|
1 |
2 |
if (@size) |
|
138
|
1 |
0 |
if ($type eq 'cm') { } |
|
|
0 |
0 |
elsif ($type eq 'inches') { } |
|
152
|
2 |
1 |
unless $data->{'description'} |
|
154
|
1 |
2 |
if $data->{'weight'} |
|
156
|
1 |
2 |
if ($data->{'description'}) |
|
163
|
0 |
3 |
if ($json) { } |
|
166
|
0 |
0 |
if @order |
|
167
|
0 |
0 |
if @order |
|
173
|
1 |
2 |
if ($code) |
|
184
|
1 |
2 |
if ($data->{'content'}) |
|
188
|
1 |
0 |
if $data->{'title'} |
|
189
|
1 |
0 |
if $data->{'author'} |
|
192
|
1 |
2 |
if $data->{'published'} |
|
193
|
1 |
2 |
if $data->{'isbn10'} |
|
194
|
1 |
2 |
if $data->{'isbn13'} |
|
195
|
1 |
2 |
if $data->{'pubdate'} |
|
198
|
2 |
1 |
unless defined $data->{'isbn13'} |
|
201
|
0 |
17 |
unless defined $data->{$_} |