line |
true |
false |
branch |
101
|
2 |
19 |
unless ($parser->getoptionsfromarray(\@args, \%opts, @$options_ref)) |
104
|
1 |
1 |
if ($command) { } |
158
|
2 |
10 |
unless (@args) |
166
|
0 |
11 |
if ($opts_ref->{'help'}) |
169
|
1 |
10 |
unless (@$args_ref) |
173
|
1 |
9 |
unless ($COMMANDS{$command}) |
179
|
0 |
8 |
if (exists $COMMANDS{$command}{'required'}) |
181
|
0 |
0 |
unless (exists $opts_ref->{$required}) |
188
|
8 |
0 |
if (exists $COMMANDS{$command}{'maximum'}) |
189
|
2 |
6 |
if (scalar @$args_ref > $COMMANDS{$command}{'maximum'}) |
193
|
5 |
1 |
if (exists $COMMANDS{$command}{'minimum'}) |
194
|
1 |
4 |
if (scalar @$args_ref < $COMMANDS{$command}{'minimum'}) |
201
|
0 |
5 |
if ($COMMANDS{$command}{'code'}) { } |
209
|
1 |
4 |
if ($@) |