| line |
true |
false |
branch |
|
39
|
42 |
2 |
unless defined $params->{'command_base'} |
|
52
|
0 |
44 |
unless scalar keys %cmds == scalar @cmd_plugins |
|
96
|
141 |
0 |
if index($package, $bwc) == 0 |
|
139
|
44 |
1 |
unless defined $params{'command_commands'} |
|
140
|
23 |
22 |
if (($cmd_name_index = &first_index(sub {
$cmd = $params{'command_commands'}{$_};
}
, @args)) >= 0) { } |
|
149
|
23 |
0 |
unless defined $cmd_create_params{'command_execute_method_name'} |
|
151
|
4 |
19 |
unless defined $cmd_create_params{'command_execute_method_name'} |
|
161
|
41 |
3 |
unless defined $params{'command_creation_chain_methods'} |
|
165
|
39 |
5 |
&_ARRAY($params{'command_creation_chain_methods'}) ? : |
|
166
|
82 |
1 |
if defined $_ |
|
|
3 |
41 |
unless my $creation_method = &first_result(sub {
$class->can($_) if defined $_;
}
, @creation_chain) |
|
173
|
27 |
14 |
unless defined $params{'command_chain'} |
|
177
|
22 |
19 |
if ($cmd) { } |
|
181
|
16 |
6 |
if $cmd->can("_build_command_creation_method_name") |
|
183
|
16 |
6 |
if $creation_method_name |
|
184
|
16 |
6 |
if ($creation_method) { } |
|
193
|
12 |
0 |
if defined $_ |
|
|
0 |
6 |
unless $creation_method = &first_result(sub {
$cmd->can($_) if defined $_;
}
, @creation_chain) |
|
199
|
0 |
6 |
$cemn ? : |
|
201
|
3 |
3 |
if $self->command_execute_from_new |
|
208
|
13 |
6 |
if $self->command_execute_from_new |