| line |
true |
false |
branch |
|
141
|
1 |
0 |
if $locator_dep |
|
142
|
1 |
0 |
if $locator_arr |
|
144
|
1 |
0 |
unless $lat_dep =~ /^\s\d+/ |
|
145
|
0 |
1 |
if $lat_dep =~ /^\s\d+/ |
|
146
|
0 |
1 |
unless $lat_arr =~ /^\s\d+/ |
|
147
|
1 |
0 |
if $lat_arr =~ /^\s\d+/ |
|
149
|
1 |
0 |
unless $long_dep =~ /^\s\d+/ |
|
150
|
0 |
1 |
if $long_dep =~ /^\s\d+/ |
|
151
|
0 |
1 |
unless $long_arr =~ /^\s\d+/ |
|
152
|
1 |
0 |
if $long_arr =~ /^\s\d+/ |
|
202
|
0 |
2 |
if ($error) |
|
218
|
0 |
2 |
if length $loc > 6 |
|
225
|
1 |
1 |
if $latitude < 0 |
|
226
|
1 |
1 |
if $longitude < 0 |
|
227
|
1 |
1 |
if $longitude > 0 |
|
228
|
1 |
1 |
if $longitude < 0 |
|
253
|
0 |
5 |
if ($check{'_error'}) |
|
279
|
0 |
3 |
if (not $course =~ /$pattern/) { } |
|
282
|
0 |
3 |
if ($course < -360 or $course > 360) |
|
350
|
0 |
22 |
if ($4) { } |
|
351
|
22 |
0 |
if ($key and $coord{$key} =~ /$grad_match/) |
|
352
|
10 |
12 |
if ($2 eq 'S' or $2 eq 'W' or $2 eq '-') { } |
|
354
|
0 |
10 |
if ($2 eq 'S' and $coord_dec{$key . '_dec'} < -90) |
|
355
|
0 |
10 |
if ($2 eq 'W' and $coord_dec{$key . '_dec'} < -180) |
|
358
|
0 |
12 |
if ($2 eq 'N' and $coord_dec{$key . '_dec'} > 90) |
|
359
|
0 |
12 |
if ($2 eq 'E' and $coord_dec{$key . '_dec'} > 180) |
|
380
|
1 |
4 |
unless $origin_point |
|
381
|
0 |
5 |
if $date =~ /Error/ |
|
382
|
0 |
5 |
if $Lat =~ /Error/ |
|
383
|
0 |
5 |
if $Long =~ /Error/ |
|
391
|
0 |
5 |
if ($day =~ /Error/) |
|
400
|
0 |
5 |
if ($year <= 1585) |
|
402
|
5 |
0 |
if ($month - 9 < 0) |
|
425
|
0 |
5 |
if ($V < 0) |
|
437
|
0 |
5 |
if ($L > 3.1415926535897931) |
|
452
|
5 |
0 |
if ($DC > 0) { } |
|
459
|
0 |
5 |
if ($DC < 0) |
|
540
|
0 |
5 |
if ($day =~ /Error/) |
|
543
|
0 |
5 |
if ($Lat == 0 or $Long == 0) |
|
562
|
6 |
0 |
if (not $check =~ /Error/) { } |
|
601
|
0 |
6 |
if (not $date =~ /$pattern/) { } |
|
606
|
0 |
6 |
$part_of_date[0] <= 9 ? : |
|
607
|
6 |
0 |
$part_of_date[1] <= 9 ? : |
|
625
|
0 |
6 |
if ($intMonth > 12) |
|
627
|
6 |
0 |
if ($array_month{$intMonth} != 0 and $part_of_date[0] <= $array_month{$intMonth}) |
|
631
|
0 |
0 |
if ($intMonth == 0) |
|
632
|
0 |
0 |
if ($intDay > 0 and $intDay < 29) { } |
|
|
0 |
0 |
elsif ($intDay == 29) { } |
|
636
|
0 |
0 |
if ($intYear % 4 == 0 and $intYear % 100 != 0 or $intYear % 400 == 0) |
|
649
|
0 |
36 |
if ($coord{$key} =~ /Error/) |