| inc/My/Module/Test/Geocode.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 2 | 20 | 10.0 |
| line | true | false | branch |
|---|---|---|---|
| 25 | 0 | 1 | unless load_package($wrapper_class) |
| 30 | 1 | 0 | unless load_package($geocoder_class) |
| 33 | 0 | 0 | unless load_package("LWP::UserAgent") |
| 37 | 0 | 0 | unless my $rslt = "LWP::UserAgent"->new->get($url) |
| 39 | 0 | 0 | unless $rslt->is_success |
| 44 | 0 | 0 | unless (eval { do { $wrapper_object = $wrapper_class->new } }) |
| 55 | 0 | 0 | unless defined $tests |
| 58 | 0 | 0 | unless $wrapper_object |
| 63 | 0 | 0 | if (() = eval { do { $wrapper_object->geocode($loc) } }) |
| 73 | 0 | 0 | if 500 == $resp->code |