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'}) |