| line |
true |
false |
branch |
|
467
|
0 |
20 |
if ($ss >= 60) { } |
|
469
|
0 |
0 |
if ++$m >= 60 |
|
483
|
17 |
3 |
unless $val =~ s/:(\d{2}\.\d+)$// |
|
485
|
0 |
3 |
if $s < 10 |
|
500
|
7 |
125 |
unless (length $val) |
|
502
|
7 |
0 |
if $doPrintConv and $doPrintConv eq 1 |
|
505
|
46 |
79 |
if ($ref) { } |
|
506
|
21 |
25 |
if ($val < 0) { } |
|
515
|
25 |
21 |
unless $doPrintConv and $doPrintConv eq 2 |
|
517
|
20 |
59 |
if ($doPrintConv and $doPrintConv eq 3) |
|
518
|
7 |
13 |
if $val < 0 |
|
524
|
85 |
40 |
if ($doPrintConv) { } |
|
525
|
64 |
21 |
if ($doPrintConv eq '1') { } |
|
527
|
40 |
24 |
if (not $fmt) { } |
|
|
13 |
11 |
elsif ($ref) { } |
|
531
|
13 |
0 |
unless $fmt =~ s/%\+/$sign%/g or $fmt =~ s/%-/$minus%/g |
|
540
|
0 |
228 |
if $1 eq "%%" |
|
542
|
58 |
170 |
if @fmt >= 3 |
|
550
|
125 |
0 |
if ($num > 1) |
|
553
|
98 |
27 |
if ($num > 2) |
|
559
|
85 |
40 |
$doPrintConv ? : |
|
560
|
0 |
125 |
if ($c[-1] >= 60) |
|
562
|
0 |
0 |
if ($c[-2] += 1) >= 60 and $num > 2 |
|
565
|
85 |
40 |
if ($doPrintConv) { } |
|
568
|
21 |
64 |
if $doPrintConv eq 2 |
|
570
|
7 |
33 |
if $neg |
|
585
|
3 |
256 |
if $val =~ /\b(inf|undef)\b/ |
|
587
|
0 |
20 |
if ($coord and $coord eq 'lat' || $coord eq 'lon' and $val =~ /^(.*(?:N(?:orth)?|S(?:outh)?)),\s*(.*(?:E(?:ast)?|W(?:est)?))$/i) |
|
591
|
0 |
0 |
$coord eq 'lat' ? : |
|
595
|
0 |
256 |
unless defined $d |
|
598
|
211 |
45 |
$doSign ? : |
|
|
2 |
254 |
if $doSign ? $val =~ /[^A-Z](S(outh)?|W(est)?)\s*$/i : $deg < 0 |