| blib/lib/WWW/Amazon/Wishlist.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 6 | 74 | 8.1 |
| line | true | false | branch |
|---|---|---|---|
| 158 | 0 | 1 | $uk ? : |
| 168 | 0 | 1 | $uk ? : |
| 174 | 0 | 1 | if 1 < $iPage |
| 186 | 0 | 0 | if (9 < $test) |
| 200 | 0 | 0 | unless (defined $result) |
| 205 | 0 | 0 | unless (ref $result->{'items'}) |
| 219 | 0 | 0 | if $item->{'priority'} =~ m[Desired:\s*\s*(\d+)]i |
| 220 | 0 | 0 | if $item->{'priority'} =~ m[Priority:\s*\s*(\d)]i |
| 221 | 0 | 0 | if ($uk and $item->{'image'} and not $item->{'image'} =~ /^http:/) |
| 235 | 0 | 0 | unless (defined $result->{'next'}) |
| 287 | 0 | 3 | if $response->is_success |
| 288 | 0 | 3 | if ($response->is_redirect) |
| 296 | 1 | 0 | unless ($response->is_success) |
| 323 | 0 | 0 | if $iUK |
| 334 | 0 | 0 | unless ref $oSPAN |
| 349 | 0 | 0 | unless ref $oA |
| 362 | 0 | 0 | unless $sTitle =~ /\S/ |
| 366 | 0 | 0 | if $sTitle eq 'Universal Wish List Button' |
| 367 | 0 | 0 | if $sTitle eq 'Buying this gift elsewhere?' |
| 370 | 0 | 0 | if ($sURL =~ m[/detail(?:/offer-listing)?/-/(.+?)/ref] or $sURL =~ m[/gp/product/(.+?)/ref] or $sURL =~ m[/dp/(.+?)/(_encoding|ref)]) { } |
| 388 | 0 | 0 | if ($sASIN eq '') |
| 393 | 0 | 0 | $iUK ? : |
| 399 | 0 | 0 | unless (ref $oParent) |
| 420 | 0 | 0 | unless ref $oSPAN |
| 428 | 0 | 0 | unless ($iDesired and $sPriority) |
| 432 | 0 | 0 | if ($sParentHTML =~ / |
| 442 | 0 | 0 | if ($sParentHTML =~ //) { } |
| 458 | 0 | 0 | if ($sParentHTML =~ />added\s+(.+?) |
| 470 | 0 | 0 | if ($iUK) { } |
| 492 | 0 | 0 | unless ref $oTD |
| 496 | 0 | 0 | if ($s =~ s/\A\s*(by|~)\s+//) |
| 512 | 0 | 0 | if (not ref $oTDprice) { } |
| 522 | 0 | 0 | if ($sPrice =~ /Price:\s+(.+)\Z/) |
| 552 | 0 | 0 | if length $_[0]->attr('href') < 55 |
| 564 | 0 | 0 | if (ref $oA) { } |
| 578 | 0 | 0 | if ($s =~ /PRIORITY:?\s*(\w+?)(\s|\z)/i) |
| 587 | 0 | 0 | if ($s =~ /(?:DESIRED|WANTS):?\s*(\d+)/i) |