| line |
true |
false |
branch |
|
63
|
136 |
21 |
if (defined $float and $float ne '') |
|
79
|
8 |
10 |
if (defined $fahrenheit and $fahrenheit ne '') |
|
89
|
17 |
1 |
if (defined $celsius and $celsius ne '') |
|
111
|
9 |
0 |
if (defined $F and $F ne '' and defined $wind_speed_mph and $wind_speed_mph ne '') |
|
119
|
0 |
9 |
if ($F <= 50 and $wind_speed_mph > 3) |
|
139
|
8 |
1 |
if (defined $F and $F ne '' and defined $rh and $rh ne '') |
|
162
|
20 |
0 |
if (defined $knots and $knots ne '') |
|
176
|
20 |
0 |
if (defined $knots and $knots ne '') |
|
190
|
9 |
0 |
if (defined $miles and $miles ne '') |
|
244
|
4 |
3 |
if ($coded =~ /^[-+]/) { } |
|
247
|
4 |
0 |
unless ($old_conditions1) |
|
256
|
4 |
0 |
if ($Block2t) |
|
261
|
2 |
2 |
if ($Modifier =~ /^\-/) { } |
|
|
2 |
0 |
elsif ($Modifier =~ /^\+/) { } |
|
270
|
4 |
0 |
if ($Block2) |
|
274
|
0 |
4 |
if ($old_conditionstext) { } |
|
275
|
0 |
0 |
if ($Block1 eq 'SH') { } |
|
291
|
3 |
0 |
unless ($old_conditions1) |
|
299
|
2 |
1 |
if ($Block2t) |
|
305
|
0 |
3 |
if ($old_conditionstext) { } |
|
306
|
0 |
0 |
if ($Block1 eq 'SH') { } |
|
409
|
0 |
0 |
unless ($Code) |
|
415
|
0 |
0 |
if ($$Self{'http'}) { } |
|
424
|
0 |
0 |
if ($Res->is_success) |
|
427
|
0 |
0 |
if ($Line =~ /<(TITLE|H1|H2)>/) { } |
|
436
|
0 |
0 |
if ($Line =~ /^[A-Z][A-Z0-9]{3}\s/) |
|
455
|
0 |
0 |
unless (defined $Ftp) |
|
464
|
0 |
0 |
if ($Rcode =~ /^[45]/) |
|
474
|
0 |
0 |
if ($Rcode =~ /^[45]/) |
|
485
|
0 |
0 |
if ($Rcode =~ /^[45]/) |
|
492
|
0 |
0 |
unless open my $F, '<', $Tmpfile |
|
544
|
10 |
113 |
if ($column == 1 and $Line =~ m[^\d{4}/\d{2}/\d{2}$]) |
|
548
|
10 |
113 |
if ($column == 2 and $Line =~ /^\d{2}:\d{2}$/) |
|
556
|
10 |
113 |
if ($Line =~ /^([A-Z][A-Z0-9]{3})/ and not $have_icao_code) { } |
|
|
10 |
103 |
elsif ($Line =~ /([0-9]Z)$/) { } |
|
|
10 |
93 |
elsif ($Line =~ /([0-9]KT)$/) { } |
|
|
9 |
84 |
elsif ($Line =~ /([0-9]SM)$/) { } |
|
|
7 |
77 |
elsif ($Line =~ /
(BR|TS|MI|PR|BC|DR|BL|SH|FZ|DZ|RA|SN|SG|IC|PE|PL|GR|GS|UP|FG|FU|VA|DU|SA|HZ|PY|PO|SQ|FC|SS)
([A-Z])*
/x or $Line =~ /^VC([A-Z])*/ or $Line =~ /[\+\-]VC([A-Z])*/) { } |
|
|
13 |
64 |
elsif ($Line =~ /^(VV[0-9])/ or $Line =~ /^(SKC[0-9])/ or $Line =~ /^(CLR)/ or $Line =~ /^(FEW)/ or $Line =~ /^(SCT[0-9])/ or $Line =~ /^(BKN[0-9])/ or $Line =~ /^(OVC[0-9])/) { } |
|
|
9 |
55 |
elsif ($Line =~ m[^([0-9][0-9]/[0-9][0-9])] or $Line =~ m[^(M[0-9][0-9]/)] or $Line =~ m[^(M[0-9][0-9]/M[0-9][0-9])] or $Line =~ m[^([0-9][0-9]/M[0-9][0-9])]) { } |
|
|
9 |
46 |
elsif ($Line =~ /^(A[0-9]{4})/) { } |
|
|
1 |
45 |
elsif ($Line =~ /^(Q[0-9]{4})/) { } |
|
|
9 |
36 |
elsif ($Line =~ /^(RMK)/) { } |
|
569
|
0 |
10 |
if $Line eq 'AUTO' |
|
593
|
0 |
10 |
if ($Line =~ /VRB/) { } |
|
606
|
0 |
10 |
if ($Variable) { } |
|
|
3 |
7 |
elsif ($Winddir <= 22.5 or $Winddir >= 337.5) { } |
|
|
0 |
7 |
elsif ($Winddir <= 67.5 and $Winddir >= 22.5) { } |
|
|
0 |
7 |
elsif ($Winddir <= 112.5 and $Winddir >= 67.5) { } |
|
|
0 |
7 |
elsif ($Winddir <= 157.5 and $Winddir >= 112.5) { } |
|
|
0 |
7 |
elsif ($Winddir <= 202.5 and $Winddir >= 157.5) { } |
|
|
6 |
1 |
elsif ($Winddir <= 247.5 and $Winddir >= 202.5) { } |
|
|
0 |
1 |
elsif ($Winddir <= 292.5 and $Winddir >= 247.5) { } |
|
|
1 |
0 |
elsif ($Winddir <= 337.5 and $Winddir >= 292.5) { } |
|
637
|
6 |
4 |
if ($Windspeedkts =~ /G/) |
|
639
|
0 |
6 |
if (not defined $Windgustkts or $Windgustkts eq '') |
|
647
|
2 |
8 |
if ($Windspeedkts == 0) |
|
680
|
7 |
2 |
if ($Line =~ m[/]) |
|
682
|
7 |
0 |
if (defined $Denominator and $Denominator ne '') { } |
|
683
|
7 |
0 |
if ($Denominator != 0) { } |
|
714
|
7 |
0 |
if defined $conditionstext |
|
715
|
7 |
0 |
if defined $conditions1 |
|
716
|
6 |
1 |
if defined $conditions2 |
|
717
|
4 |
3 |
if defined $intensity |
|
735
|
0 |
13 |
if ($Line =~ /^(CLR)/) { } |
|
|
3 |
10 |
elsif ($Line =~ /^(FEW)/) { } |
|
|
2 |
8 |
elsif ($Line =~ /^(SCT[0-9])/) { } |
|
|
2 |
6 |
elsif ($Line =~ /^(BKN[0-9])/) { } |
|
|
6 |
0 |
elsif ($Line =~ /^(OVC[0-9])/) { } |
|
751
|
3 |
10 |
unless ($$Self{'conditionstext'}) |
|
766
|
1 |
8 |
if ($Dewpoint eq '') |
|
770
|
1 |
8 |
if ($Temperature =~ /M/) |
|
775
|
0 |
9 |
if (defined $Dewpoint and $Dewpoint =~ /M/) |
|
787
|
8 |
1 |
if (defined $Dewpoint) |
|
789
|
8 |
0 |
if ($Es != 0) |
|
882
|
9 |
136 |
if ($Line =~ /^(RMK)/) |
|
886
|
31 |
114 |
if ($Remarks) |
|
905
|
31 |
0 |
if ($Remark) |
|
908
|
3 |
28 |
if ($Remark =~ /^AO[1-2]/) { } |
|
|
9 |
19 |
elsif ($Remark =~ /^SLP/) { } |
|
|
0 |
19 |
elsif ($Remark =~ /^TS/) { } |
|
|
1 |
18 |
elsif ($Remark =~ /^5[0-9]/) { } |
|
|
1 |
17 |
elsif ($Remark =~ /\$/) { } |
|
|
0 |
17 |
elsif ($Remark =~ /^P[0-9]/) { } |
|
|
0 |
17 |
elsif ($Line =~ /^(BRB|TSB|MIB|PRB|BCB|DRB|BLB|SHB|FZB|DZB|RAB|SNB|SGB|ICB|PEB|GRB|GSB|UPB|FGB|FUB|VAB|DUB|SAB|HZB|PYB|POB|SQB|FCB|SSB)/) { } |
|
|
8 |
9 |
elsif ($Remark =~ /^T[0-9]/) { } |
|
914
|
1 |
8 |
if (not defined $Remark or $Remark eq '') |
|
918
|
0 |
9 |
if ($Remark and $Remark >= 800) { } |
|
988
|
0 |
10 |
if ($Templatefile) |
|
990
|
0 |
0 |
unless open my $F, '<', $Templatefile |
|
996
|
0 |
0 |
exists $$Self{$1} ? : |