| line |
true |
false |
branch |
|
30
|
0 |
1 |
unless &GetOptionsFromArray(\@args, \%options, ("help", "man", "v", "contains=s", "null|0", "format=s", "json", "human-readable|h")) |
|
46
|
0 |
1 |
if defined $options{'man'} |
|
47
|
0 |
1 |
if defined $options{'help'} |
|
49
|
0 |
1 |
if (defined $options{'v'}) |
|
71
|
0 |
1 |
unless $vers_string |
|
73
|
1 |
0 |
if defined $options{'json'} |
|
74
|
0 |
1 |
if defined $options{'human-readable'} |
|
78
|
0 |
1 |
if ($@) |
|
83
|
0 |
1 |
if (defined $options{'contains'}) |
|
87
|
0 |
0 |
unless ($vers_comparator_class->can("new")) |
|
94
|
0 |
0 |
if ($@) |
|
99
|
0 |
0 |
$res ? : |
|
104
|
1 |
0 |
if ($options{'format'} eq "json") |
|
109
|
0 |
0 |
if ($options{'format'} eq "human-readable") |