| line |
true |
false |
branch |
|
39
|
0 |
4 |
unless &GetOptions(\%option, "data=s", "help", "metadata=s", "outfile=s", "strict_checking=i", "tableformat=s", "tablepath=s", "verbose=i") |
|
52
|
0 |
4 |
if $option{'help'} |
|
55
|
0 |
4 |
unless $option{'data'} and $option{'metadata'} |
|
62
|
0 |
4 |
defined $option{'strict_checking'} ? : |
|
66
|
0 |
4 |
if $option{'verbose'} |
|
69
|
1 |
3 |
defined $option{'tableformat'} ? : |
|
73
|
4 |
0 |
if ($option{'tablepath'}) { } |
|
|
0 |
0 |
elsif ($ENV{'BUFR_TABLES'}) { } |
|
81
|
0 |
0 |
if ($tableformat eq 'BUFRDC') { } |
|
|
0 |
0 |
elsif ($tableformat eq 'ECCODES') { } |
|
103
|
1 |
3 |
if ($option{'outfile'}) { } |
|
105
|
0 |
1 |
unless open my $fh, ">", $outfile |
|
119
|
0 |
4 |
unless open my $fh, "<", $file |
|
122
|
0 |
77 |
if /^\s*$/ |
|
127
|
0 |
4 |
unless close $fh |
|
141
|
2 |
2 |
if ($bufr_edition < 4) { } |
|
149
|
2 |
2 |
if ($bufr_edition < 4) { } |
|
158
|
2 |
2 |
if $bufr_edition >= 4 |
|
162
|
0 |
4 |
if exists $m->{'LOCAL_USE'} |
|
170
|
0 |
4 |
unless open my $fh, "<", $file |
|
177
|
26 |
1302 |
unless /^\d/ |
|
179
|
7 |
1295 |
if $n == 1 |
|
182
|
2 |
1300 |
if (not defined $desc && $desc =~ /^\d/) { } |
|
183
|
0 |
2 |
unless $n >= 200000 and $n < 300000 |
|
188
|
317 |
983 |
if $value eq "" or $value eq "missing" |
|
193
|
0 |
4 |
unless close $fh |