| line |
true |
false |
branch |
|
97
|
0 |
2 |
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 |
2 |
if $@ or not $mech->success or not $mech->content |
|
112
|
0 |
2 |
unless $link |
|
116
|
0 |
2 |
if $@ or not $mech->success or not $mech->content |
|
146
|
3 |
5 |
if $$data{'title'} and $$data{'author'} |
|
165
|
3 |
13 |
if $desc |
|
168
|
3 |
13 |
if $$data{'description'} |
|
172
|
1 |
3 |
unless $$data{$key} |
|
179
|
1 |
3 |
if $$data{'weight'} and $weight eq 'ounces' |
|
180
|
2 |
2 |
if $$data{'weight'} and $weight eq 'pounds' |
|
184
|
4 |
0 |
unless @size |
|
185
|
3 |
1 |
if (@size) |
|
188
|
0 |
3 |
if ($type eq 'cm') { } |
|
|
3 |
0 |
elsif ($type eq 'inches') { } |
|
197
|
1 |
3 |
if ($json) { } |
|
200
|
1 |
0 |
if @order |
|
201
|
1 |
0 |
if @order |
|
207
|
3 |
1 |
if $$data{'published'} |
|
208
|
3 |
1 |
if $$data{'isbn10'} |
|
209
|
3 |
1 |
if $$data{'isbn13'} |
|
212
|
1 |
3 |
unless defined $$data{'isbn13'} |
|
216
|
0 |
51 |
unless defined $$data{$_} |