| blib/lib/WWW/Scraper/ISBN/AmazonDE_Driver.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 6 | 10 | 60.0 |
| line | true | false | branch |
|---|---|---|---|
| 54 | 0 | 1 | unless $mechanize->success |
| 66 | 0 | 67 | $script =~ /registerImage\("original_image"/ ? : |
| 83 | 0 | 1 | unless defined $data |
| 88 | 2 | 3 | unless defined $$data{$_} |
| 106 | 0 | 1 | if ($$data{'author'} =~ /\A\d+/) |