| blib/lib/Geo/WebService/Elevation/USGS.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 16 | 41 | 39.0 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 314 | 2 | 1 | 2 | defined $ele && &looks_like_number($ele) && $ele > -1e+300 |
| 362 | 1 | 3 | 1 | defined $val and not $val =~ / \A \d+ \z /msx |
| 374 | 0 | 0 | 0 | &looks_like_number($val) and $val >= 0 |
| 390 | 0 | 0 | 0 | defined $val and $val =~ / \A \d+ \z /msx |
| 594 | 0 | 0 | 10 | "HASH" eq ref $rslt and exists $rslt->{$key} |
| 608 | 0 | 0 | 5 | defined $rslt->{'Elevation'} and defined($places = $self->get("places")) |
| line | l | !l | condition |
|---|---|---|---|
| 144 | 0 | 2 | $ENV{'GEO_WEBSERVICE_ELEVATION_USGS_URL'} || 'https://nationalmap.gov/epqs/pqs.php' |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 246 | 5 | 0 | 0 | not $valid or is_valid($rslt) |
| 345 | 0 | 0 | 9 | $clean ||= $clean_transport_object{$name} |
| 378 | 0 | 0 | 0 | $using_time_hires or $val >= 1 |
| 0 | 0 | 0 | $using_time_hires or $val >= 1 or $val == 0 | |
| 433 | 10 | 0 | 0 | defined $item or defined($item = $info->{'dflt'}->()) |
| 551 | 4 | 1 | 0 | $self->{'_json'} ||= "JSON"->new->utf8->allow_nonref |
| 554 | 4 | 1 | 0 | $self->{'_transport_object'} ||= "LWP::UserAgent"->new("timeout", $self->{'timeout'}) |