line |
true |
false |
branch |
23
|
0 |
0 |
unless $options{'token'} |
24
|
0 |
0 |
unless $options{'sak'} |
27
|
0 |
0 |
unless $locale eq 'jp' or $locale eq 'uk' or $locale eq 'fr' or $locale eq 'us' or $locale eq 'de' or $locale eq 'ca' |
32
|
0 |
0 |
if $locale eq 'jp' |
33
|
0 |
0 |
if $locale eq 'uk' |
34
|
0 |
0 |
if $locale eq 'fr' |
35
|
0 |
0 |
if $locale eq 'de' |
36
|
0 |
0 |
if $locale eq 'ca' |
37
|
0 |
0 |
if $locale eq 'us' |
65
|
0 |
0 |
if $type eq 'asin' |
66
|
0 |
0 |
if $type eq 'search' |
75
|
0 |
0 |
if $asin =~ /[^a-zA-Z0-9]/ |
90
|
0 |
0 |
if ($pl->{'Items'}{'Item'}{'ASIN'}) { } |
96
|
0 |
0 |
if ($pl->{'Items'}{'Item'}{'ItemAttributes'}{'Author'}[0]) |
102
|
0 |
0 |
if ($pl->{'Items'}{'Item'}{'ItemAttributes'}{'Artist'}[0]) |
107
|
0 |
0 |
if ($pl->{'Items'}{'Item'}{'ItemAttributes'}{'Actor'}[0]) |
113
|
0 |
0 |
if ($pl->{'Items'}{'Item'}{'ItemAttributes'}{'Director'}[0]) |
120
|
0 |
0 |
if ($pl->{'Items'}{'Item'}{'ItemAttributes'}{'Creator'}[0]{'content'}) |
133
|
0 |
0 |
unless $ITEM->{'mediumimage'} |
135
|
0 |
0 |
unless $ITEM->{'largeimage'} |
168
|
0 |
0 |
if ($pl->{'Items'}{'Item'}[0]{'ASIN'}) { } |
183
|
0 |
0 |
if ($pl->{'Items'}{'Item'}[$i]{'ItemAttributes'}{'Author'}[0]) |
189
|
0 |
0 |
if ($pl->{'Items'}{'Item'}[$i]{'ItemAttributes'}{'Artist'}[0]) |
195
|
0 |
0 |
if ($pl->{'Items'}{'Item'}[$i]{'ItemAttributes'}{'Creator'}[0]{'content'}) |
201
|
0 |
0 |
if ($pl->{'Items'}{'Item'}[$i]{'ItemAttributes'}{'Director'}[0]) |
208
|
0 |
0 |
if ($pl->{'Items'}{'Item'}[$i]{'ItemAttributes'}{'Actor'}[0]) |
219
|
0 |
0 |
unless $new_item->{'mediumimage'} |
221
|
0 |
0 |
unless $new_item->{'largeimage'} |
263
|
0 |
0 |
unless my $data = &LWP::Simple::get('http://' . $url . '/onca/xml?' . join('&', @param)) |