line |
true |
false |
branch |
130
|
42 |
2 |
unless defined $params->{'command_base'} |
143
|
0 |
44 |
unless scalar keys %cmds == scalar @cmd_plugins |
224
|
141 |
0 |
if index($package, $bwc) == 0 |
267
|
44 |
1 |
unless defined $params{'command_commands'} |
268
|
23 |
22 |
if (($cmd_name_index = &first_index(sub {
$cmd = $params{'command_commands'}{$_};
}
, @args)) >= 0) { } |
277
|
23 |
0 |
unless defined $cmd_create_params{'command_execute_method_name'} |
279
|
4 |
19 |
unless defined $cmd_create_params{'command_execute_method_name'} |
289
|
41 |
3 |
unless defined $params{'command_creation_chain_methods'} |
293
|
39 |
5 |
&_ARRAY($params{'command_creation_chain_methods'}) ? : |
294
|
82 |
1 |
if defined $_ |
|
3 |
41 |
unless my $creation_method = &first_result(sub {
$class->can($_) if defined $_;
}
, @creation_chain) |
301
|
27 |
14 |
unless defined $params{'command_chain'} |
305
|
22 |
19 |
if ($cmd) { } |
309
|
16 |
6 |
if $cmd->can('_build_command_creation_method_name') |
311
|
16 |
6 |
if $creation_method_name |
312
|
16 |
6 |
if ($creation_method) { } |
321
|
12 |
0 |
if defined $_ |
|
0 |
6 |
unless $creation_method = &first_result(sub {
$cmd->can($_) if defined $_;
}
, @creation_chain) |
327
|
0 |
6 |
$cemn ? : |
329
|
3 |
3 |
if $self->command_execute_from_new |
336
|
13 |
6 |
if $self->command_execute_from_new |