line |
true |
false |
branch |
460
|
0 |
15 |
if ($ss >= 60) { } |
462
|
0 |
0 |
if ++$m >= 60 |
476
|
13 |
2 |
unless $val =~ s/:(\d{2}\.\d+)$// |
478
|
0 |
2 |
if $s < 10 |
493
|
5 |
104 |
unless (length $val) |
495
|
5 |
0 |
if $doPrintConv and $doPrintConv eq 1 |
498
|
40 |
64 |
if ($ref) { } |
499
|
18 |
22 |
if ($val < 0) { } |
506
|
23 |
17 |
unless $doPrintConv and $doPrintConv eq 2 |
508
|
16 |
48 |
if ($doPrintConv and $doPrintConv eq 3) |
509
|
5 |
11 |
if $val < 0 |
515
|
72 |
32 |
if ($doPrintConv) { } |
516
|
55 |
17 |
if ($doPrintConv eq '1') { } |
518
|
32 |
23 |
if (not $fmt) { } |
|
14 |
9 |
elsif ($ref) { } |
522
|
14 |
0 |
unless $fmt =~ s/%\+/$sign%/g |
531
|
0 |
194 |
if $1 eq "%%" |
533
|
50 |
144 |
if @fmt >= 3 |
541
|
104 |
0 |
if ($num > 1) |
544
|
82 |
22 |
if ($num > 2) |
550
|
72 |
32 |
$doPrintConv ? : |
551
|
0 |
104 |
if ($c[-1] >= 60) |
553
|
0 |
0 |
if ($c[-2] += 1) >= 60 and $num > 2 |
556
|
72 |
32 |
if ($doPrintConv) { } |
559
|
17 |
55 |
if $doPrintConv eq 2 |
561
|
5 |
27 |
if $neg |
576
|
2 |
225 |
if $val =~ /\b(inf|undef)\b/ |
578
|
0 |
6 |
if ($coord and $coord eq 'lat' || $coord eq 'lon' and $val =~ /^(.*(?:N(?:orth)?|S(?:outh)?)),\s*(.*(?:E(?:ast)?|W(?:est)?))$/i) |
582
|
0 |
0 |
$coord eq 'lat' ? : |
586
|
0 |
225 |
unless defined $d |
589
|
191 |
34 |
$doSign ? : |
|
1 |
224 |
if $doSign ? $val =~ /[^A-Z](S(outh)?|W(est)?)\s*$/i : $deg < 0 |