| line |
true |
false |
branch |
|
39
|
0 |
12 |
unless &GetOptions(\%option, "bufrtable=s", "code=s", "flag=i", "help", "noexpand", "partial", "simple", "tableformat=s", "tablepath=s", "verbose=i") |
|
57
|
0 |
12 |
if $option{'help'} |
|
60
|
6 |
6 |
if (defined $option{'code'} or defined $option{'flag'}) { } |
|
61
|
0 |
6 |
if @ARGV |
|
63
|
0 |
6 |
unless @ARGV |
|
67
|
0 |
12 |
if defined $option{'flag'} and not defined $option{'code'} |
|
71
|
0 |
18 |
unless /^\d+$/ |
|
73
|
0 |
12 |
if (defined $option{'code'} and not $option{'code'} =~ /^\d+$/) |
|
76
|
0 |
12 |
if (defined $option{'flag'} and not $option{'flag'} =~ /^\d+$/) |
|
82
|
0 |
12 |
$option{'verbose'} ? : |
|
91
|
5 |
7 |
defined $option{'tableformat'} ? : |
|
95
|
12 |
0 |
if ($option{'tablepath'}) { } |
|
|
0 |
0 |
elsif ($ENV{'BUFR_TABLES'}) { } |
|
103
|
0 |
0 |
if ($tableformat eq 'BUFRDC') { } |
|
|
0 |
0 |
elsif ($tableformat eq 'ECCODES') { } |
|
115
|
6 |
6 |
if (defined $option{'code'}) { } |
|
118
|
3 |
3 |
if (defined $option{'flag'}) { } |
|
119
|
0 |
3 |
if ($option{'flag'} == 0) { } |
|
130
|
1 |
5 |
if ($option{'simple'}) { } |
|
|
1 |
4 |
elsif ($option{'partial'}) { } |
|
|
1 |
3 |
elsif ($option{'noexpand'}) { } |