line |
true |
false |
branch |
109
|
2 |
21 |
unless ($parser->getoptionsfromarray(\@args, \%opts, @$options_ref)) |
112
|
1 |
1 |
if ($command) { } |
166
|
2 |
11 |
unless (@args) |
174
|
0 |
12 |
if ($opts_ref->{'help'}) |
177
|
1 |
11 |
unless (@$args_ref) |
181
|
1 |
10 |
unless ($COMMANDS{$command}) |
187
|
1 |
8 |
if (exists $COMMANDS{$command}{'required'}) |
189
|
1 |
0 |
unless (exists $opts_ref->{$required}) |
196
|
8 |
0 |
if (exists $COMMANDS{$command}{'maximum'}) |
197
|
2 |
6 |
if (scalar @$args_ref > $COMMANDS{$command}{'maximum'}) |
201
|
5 |
1 |
if (exists $COMMANDS{$command}{'minimum'}) |
202
|
1 |
4 |
if (scalar @$args_ref < $COMMANDS{$command}{'minimum'}) |
209
|
0 |
5 |
if ($COMMANDS{$command}{'code'}) { } |
217
|
1 |
4 |
if ($@) |