| blib/lib/WWW/Amazon/Wishlist.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 6 | 82 | 7.3 |
| line | true | false | branch |
|---|---|---|---|
| 156 | 0 | 1 | $uk ? : |
| 164 | 0 | 1 | $uk ? : |
| 170 | 0 | 1 | if 1 < $iPage |
| 182 | 0 | 0 | if (9 < $test) |
| 196 | 0 | 0 | unless (defined $result) |
| 201 | 0 | 0 | unless (ref $result->{'items'}) |
| 215 | 0 | 0 | if $item->{'priority'} =~ m[Desired:\s*\s*(\d+)]i |
| 216 | 0 | 0 | if $item->{'priority'} =~ m[Priority:\s*\s*(\d)]i |
| 217 | 0 | 0 | if ($uk and $item->{'image'} and not $item->{'image'} =~ /^http:/) |
| 232 | 0 | 0 | unless (defined $sURLNext) |
| 237 | 0 | 0 | if ($content =~ /([;&]page=\d+)">\s*(<[^>]+>)?\s*Next/) |
| 244 | 0 | 0 | unless (defined $sURLNext) |
| 250 | 0 | 0 | unless ($sURLNext =~ /[;&]page=(\d+)/) |
| 257 | 0 | 0 | if ($iNext <= $iPage) |
| 308 | 0 | 3 | if $response->is_success |
| 309 | 0 | 3 | if ($response->is_redirect) |
| 317 | 1 | 0 | unless ($response->is_success) |
| 344 | 0 | 0 | $iUK ? : |
| 356 | 0 | 0 | unless ref $oSPAN |
| 371 | 0 | 0 | unless ref $oA |
| 384 | 0 | 0 | unless $sTitle =~ /\S/ |
| 388 | 0 | 0 | if $sTitle eq 'Universal Wish List Button' |
| 389 | 0 | 0 | if $sTitle eq 'Buying this gift elsewhere?' |
| 392 | 0 | 0 | if ($sURL =~ m[/detail(?:/offer-listing)?/-/(.+?)/ref] or $sURL =~ m[/gp/product/(.+?)/ref] or $sURL =~ m[/dp/(.+?)/ref]) { } |
| 410 | 0 | 0 | if ($sASIN eq '') |
| 415 | 0 | 0 | $iUK ? : |
| 420 | 0 | 0 | unless (ref $oParent) |
| 441 | 0 | 0 | unless ref $oSPAN |
| 449 | 0 | 0 | unless ($iDesired and $sPriority) |
| 453 | 0 | 0 | if ($sParentHTML =~ / |
| 463 | 0 | 0 | if ($sParentHTML =~ //) { } |
| 479 | 0 | 0 | if ($sParentHTML =~ />added\s+(.+?) |
| 491 | 0 | 0 | if ($iUK) { } |
| 513 | 0 | 0 | unless ref $oTD |
| 517 | 0 | 0 | if ($s =~ s/\A\s*(by|~)\s+//) |
| 533 | 0 | 0 | if (not ref $oTDprice) { } |
| 543 | 0 | 0 | if ($sPrice =~ /Price:\s+(.+)\Z/) |
| 573 | 0 | 0 | if length $_[0]->attr('href') < 5 |
| 582 | 0 | 0 | if (ref $oA) { } |
| 596 | 0 | 0 | if ($s =~ /.+PRIORITY:?\s*(\w+?)(\s|\z)/i) |
| 605 | 0 | 0 | if ($s =~ /(?:DESIRED|WANTS):?\s*(\d+)/i) |