line |
true |
false |
branch |
27
|
2 |
1 |
if (@_) |
37
|
9 |
1 |
if @_ |
40
|
11 |
295 |
if (blessed $pt and $pt->can('latitude') and $pt->can('longitude') and $pt->can('time')) { } |
|
2 |
293 |
elsif (ref $pt eq 'CODE') { } |
|
1 |
292 |
elsif (ref $pt eq 'ARRAY') { } |
|
292 |
0 |
elsif (ref $pt eq 'HASH') { } |
56
|
2 |
269 |
if (@pts >= 100) |
68
|
0 |
292 |
unless exists $$pt{'lat'} and exists $$pt{'lon'} and exists $$pt{'time'} |
77
|
0 |
0 |
defined $pt ? : |
88
|
4 |
306 |
if ($$self{'need_sort'}) |
90
|
313 |
0 |
if defined $$_{'lat'} and defined $$_{'lon'} |
116
|
1225 |
1127 |
if ($cmp < 0) { } |
|
1123 |
4 |
elsif ($cmp > 0) { } |
131
|
305 |
1 |
$mid < $max ? : |
136
|
0 |
600 |
unless $lo <= $mid and $mid <= $hi |
151
|
1 |
305 |
unless defined $pos |
153
|
4 |
301 |
if ($$pts[$pos]{'time'} == $time) |
163
|
4 |
0 |
wantarray ? : |
169
|
1 |
300 |
if $pos == 0 |
189
|
200 |
100 |
if (wantarray or defined $max_dist) |
193
|
100 |
100 |
$d1 < $d2 ? : |
197
|
64 |
136 |
if defined $max_dist and $best_dist > $max_dist |
202
|
136 |
100 |
wantarray ? : |
225
|
600 |
600 |
if (defined $lat1) |
230
|
0 |
600 |
if ($res > 1) { } |
|
0 |
600 |
elsif ($res < -1) { } |
247
|
0 |
2 |
unless @{$pts;} |