| line | % | coverage | branch |
|---|
| 226 | 100 | T | F | if (defined $class and not &blessed($class) and not UNIVERSAL::isa($class, __PACKAGE__)) |
| 233 | 100 | T | F | if (&blessed($class)) |
| 367 | 100 | T | F | unless defined $lat |
| 438 | 100 | T | F | unless (defined $checked) |
| 440 | 50 | T | F | if $self->{'logger'} |
| 445 | 100 | T | F | if (ref $colour or not $colour =~ /$HEX_COLOUR/) |
| 447 | 50 | T | F | if $self->{'logger'} |
| 451 | 100 | T | F | unless defined $lat |
| 509 | 100 | T | F | unless ref $data |
| 567 | 100 | T | F | unless ref $points eq "ARRAY" |
| 616 | 100 | T | F | unless $url |
| 687 | 100 | T | F | unless ref $features eq "ARRAY" |
| 688 | 100 | T | F | unless ref $values eq "HASH" |
| 697 | 100 | T | F | if $max == $min |
| 702 | 100 | T | F | if $idx > $#{$scale;} |
| 769 | 100 | T | F | unless defined $point |
| 773 | 100 | T | F | if (ref $point eq 'ARRAY') { } |
| 100 | T | F | elsif (ref $point and $point->can('latitude')) { } |
| 100 | T | F | elsif (not ref $point) { } |
| 775 | 100 | T | F | if scalar @{$point;} != 2 |
| 781 | 100 | T | F | unless length $point |
| 785 | 50 | T | F | if $self->{'logger'} |
| 789 | 100 | T | F | unless defined $lat and defined $lon |
| 793 | 100 | T | F | unless _validate($lat, $lon) |
| 845 | 100 | T | F | if (scalar @_) |
| 852 | 50 | T | F | if defined $params->{'zoom'} |
| 978 | 100 | T | F | unless (@$coordinates or @$geojson_layers or @$heatmap_layers or @$gpx_tracks or @$choropleth_layers or @$circle_markers) |
| 981 | 50 | T | F | if $self->{'logger'} |
| 987 | 100 | T | F | if (not defined $zoom && $zoom =~ /\A[0-9]+\z/ or $zoom < $ZOOM_MIN or $zoom > $ZOOM_MAX) |
| 996 | 100 | T | F | unless (defined $lat and defined $lon) |
| 998 | 100 | T | F | unless defined $label and length $label |
| 1004 | 50 | T | F | unless defined $lat and defined $lon |
| 1006 | 100 | T | F | unless _validate($lat, $lon) |
| 1014 | 50 | T | F | unless defined $lat and defined $lon |
| 1016 | 100 | T | F | unless _validate($lat, $lon) |
| 1018 | 100 | T | F | unless defined $colour and not ref $colour and $colour =~ /$HEX_COLOUR/ |
| 1024 | 100 | T | F | if (defined $max_zoom and !($max_zoom =~ /\A[0-9]+\z/) || $max_zoom > $MAX_ZOOM_LIMIT) |
| 1028 | 100 | T | F | defined $max_zoom ? : |
| 1032 | 100 | T | F | if defined $search and $search =~ /\A(?:false|no|off)\z/i |
| 1036 | 100 | T | F | if ($self->{'center'}) { } |
| 100 | T | F | elsif (@valid_coordinates or @valid_circles) { } |
| 1043 | 100 | T | F | if $lat < $min_lat |
| 1044 | 100 | T | F | if $lat > $max_lat |
| 1045 | 100 | T | F | if $lon < $min_lon |
| 1046 | 100 | T | F | if $lon > $max_lon |
| 1064 | 100 | T | F | if ($self->{'cluster'}) |
| 1071 | 100 | T | F | if @$heatmap_layers |
| 1072 | 100 | T | F | if @$gpx_tracks |
| 1074 | 100 | T | F | if ($search) { } |
| 1095 | 100 | T | F | if ($search) |
| 1109 | 100 | T | F | if $search |
| 1113 | 100 | T | F | if $clustered |
| 1114 | 100 | T | F | if (@valid_coordinates) |
| 1119 | 100 | T | F | if ($icon_url) { } |
| 100 | T | F | elsif ($self->{'cluster'}) { } |
| 1122 | 100 | T | F | $self->{'cluster'} ? : |
| 1141 | 100 | T | F | defined $label && length $label ? : |
| 1145 | 100 | T | F | if ($self->{'cluster'}) { } |
| 1152 | 100 | T | F | if $clustered |
| 1160 | 100 | T | F | if (my $style = $opts->{'style'}) |
| 1163 | 100 | T | F | if (my $prop = $opts->{'popup'}) |
| 1221 | 100 | T | F | if ($search) |
| 1268 | 100 | T | F | if (ref $args[0] eq 'ARRAY') { } |
| 100 | T | F | elsif (&blessed($args[0]) and $args[0]->can('latitude')) { } |
| 100 | T | F | elsif (defined $args[0] and not ref $args[0] and scalar(@args) % 2 != 0) { } |
| 1272 | 100 | T | F | if scalar @{$point;} == 1 |
| 1291 | 100 | T | F | if (ref $point eq 'ARRAY') { } |
| 100 | T | F | elsif (not ref $point) { } |
| 100 | T | F | elsif ($point->can('latitude')) { } |
| 1292 | 100 | T | F | if scalar @{$point;} != 2 |
| 1296 | 100 | T | F | unless defined $point and length $point |
| 1302 | 50 | T | F | if $self->{'logger'} |
| 1306 | 100 | T | F | unless defined $lat and defined $lon |
| 1310 | 100 | T | F | unless _validate($lat, $lon) |
| 1325 | 100 | T | F | unless $location |
| 1328 | 100 | T | F | if (my $geocoder = $self->{'geocoder'}) |
| 1330 | 100 | T | F | unless defined $rc |
| 1332 | 100 | T | F | if (&blessed($rc) and $rc->can("latitude")) |
| 1335 | 100 | T | F | if (ref $rc eq "HASH") |
| 1337 | 100 | T | F | if defined $rc->{'lat'} and defined $rc->{'lon'} |
| 1339 | 100 | T | F | if defined $rc->{'geometry'}{'location'}{'lat'} |
| 1342 | 100 | T | F | if ref $rc eq "ARRAY" |
| 1351 | 100 | T | F | if (my $cached = $self->{'cache'}->get($cache_key)) |
| 1357 | 100 | T | F | if ($elapsed < $self->{'min_interval'}) |
| 1363 | 100 | T | F | unless ($ua) |
| 1370 | 100 | T | F | if $self->{'email'} |
| 1374 | 100 | T | F | if ($response->is_success) |
| 1379 | 100 | T | F | if ($@) |
| 1383 | 100 | T | F | if ref $data eq "ARRAY" |
| 1384 | 100 | T | F | if (ref $data eq "HASH" and defined $data->{'lat'}) |
| 1415 | 100 | T | F | if not $ok and defined $lat and defined $lon |
| 1419 | 100 | T | F | $ok ? : |
| 1441 | 50 | T | F | if defined $saved_locale |
| 1442 | 100 | T | F | unless defined $j |
| 1488 | 100 | T | F | unless defined $value and length $value |
| 1489 | 100 | T | F | if $value =~ /$CSS_LENGTH/ |
| 1506 | 100 | T | F | unless defined $value and not ref $value |
| 1511 | 100 | T | F | unless $str =~ /\A(?:[0-9]+(?:\.[0-9]+)?|\.[0-9]+)\z/ |
| 1514 | 100 | T | F | unless $number > 0 and $number < 1000000 |
| 1530 | 100 | T | F | if not defined $value or ref $value |
| 1535 | 100 | T | F | unless $flags & 768 |
| 1539 | 50 | T | F | if defined $radix and length $radix and $radix ne "." |
| 1556 | 100 | T | F | unless (defined $sign and length $whole || defined $frac) |
| 1561 | 100 | T | F | length $whole ? : |
| 1562 | 100 | T | F | if defined $frac |
| 1563 | 100 | T | F | $sign ? : |