| line |
true |
false |
branch |
|
116
|
0 |
0 |
unless $ean |
|
124
|
0 |
0 |
if $@ or not $mech->success or not $mech->content |
|
129
|
0 |
0 |
if $json eq 'bookdata({});' |
|
140
|
0 |
0 |
unless $$code{'ISBN:' . $ean} or $$code{'ISBN:' . $isbn} |
|
146
|
0 |
0 |
unless $data->{'url'} |
|
149
|
0 |
0 |
if $@ or not $mech->success or not $mech->content |
|
159
|
0 |
0 |
if $html =~ /Sorry, we couldn't find any matches for/is |
|
170
|
0 |
0 |
if $data->{'url'} =~ m[^http://[.\w]+\.google\.(de|ch|at)\b] |
|
171
|
0 |
0 |
if $data->{'url'} =~ m[^http://[.\w]+\.google\.co\.il\b] |
|
172
|
0 |
0 |
if $ccTLD and $LANG{$ccTLD} |
|
174
|
0 |
0 |
if $lang =~ /xx/ |
|
181
|
0 |
0 |
unless defined $data->{$_} |
|
186
|
0 |
0 |
unless defined $data->{$_} |
|
189
|
0 |
0 |
if ($data->{'image'} =~ m[^/]) |
|
242
|
0 |
0 |
ref $LANG{$lang}{'Publisher'} eq 'ARRAY' ? : |
|
245
|
0 |
0 |
if $publisher |
|
247
|
0 |
0 |
if ($publisher) |
|
254
|
0 |
0 |
ref $LANG{$lang}{'Length'} eq 'ARRAY' ? : |
|
255
|
0 |
0 |
ref $LANG{$lang}{'Pages'} eq 'ARRAY' ? : |
|
259
|
0 |
0 |
if $data->{'pages'} |
|
261
|
0 |
0 |
if $data->{'pages'} |
|
263
|
0 |
0 |
if $data->{'pages'} |
|
270
|
0 |
0 |
if length $value == 13 |
|
271
|
0 |
0 |
if length $value == 10 |
|
280
|
0 |
0 |
unless $data->{'image'} |
|
282
|
0 |
0 |
unless $data->{'author'} |
|
284
|
0 |
0 |
unless $data->{'title'} |