| line |
true |
false |
branch |
|
83
|
17 |
0 |
unless (defined $opts{'geocoder'}) |
|
89
|
4 |
13 |
$opts{'api_key'} ? : |
|
103
|
25 |
2 |
if ref $point_text eq 'ARRAY' |
|
105
|
2 |
0 |
if (my(@loc) = $self->{'geocoder'}->geocode('location', $point_text)) |
|
106
|
2 |
0 |
if (my $location = $loc[0]) |
|
108
|
0 |
2 |
if (ref $location ne 'HASH') |
|
113
|
2 |
0 |
if (defined $location->{'geometry'}{'location'}{'lat'} and defined $location->{'geometry'}{'location'}{'lng'}) |
|
130
|
6 |
12 |
unless @{$self->{'points'};} |
|
136
|
16 |
0 |
defined $lat ? : |
|
137
|
16 |
0 |
defined $lng ? : |
|
138
|
16 |
0 |
defined $lng ? : |
|
150
|
10 |
2 |
if abs $avg_lng == $avg_abs_lng |
|
153
|
1 |
1 |
if ($avg_abs_lng > 90) |
|
154
|
1 |
0 |
if ($avg_lng < 0 and abs $avg_lng <= 90) { } |
|
|
0 |
0 |
elsif (abs $avg_lng <= 90) { } |
|
275
|
0 |
5 |
if grep {not $_;} @points |
|
372
|
7 |
9 |
unless defined $self->{'dragging'} |
|
373
|
8 |
8 |
unless defined $self->{'info_window'} |
|
375
|
1 |
15 |
if $self->{'width'} =~ /^\d+$/ |
|
376
|
1 |
15 |
if $self->{'height'} =~ /^\d+$/ |
|
383
|
3 |
13 |
$self->{'api_key'} ? : |
|
391
|
1 |
15 |
exists $self->{'z_index'} ? : |