| line |
true |
false |
branch |
|
130
|
26 |
2 |
unless defined $$params{'command_base'} |
|
268
|
28 |
1 |
unless defined $params{'command_commands'} |
|
269
|
16 |
13 |
if (($cmd_name_index = first_index(sub {
$cmd = $params{'command_commands'}{$_};
}
, @args)) >= 0) { } |
|
275
|
16 |
0 |
unless defined $cmd_create_params{'command_execute_method_name'} |
|
278
|
4 |
12 |
unless defined $cmd_create_params{'command_execute_method_name'} |
|
288
|
25 |
3 |
unless defined $params{'command_creation_chain_methods'} |
|
292
|
23 |
5 |
_ARRAY($params{'command_creation_chain_methods'}) ? : |
|
294
|
50 |
1 |
if defined $_ |
|
|
3 |
25 |
unless my $creation_method = first_result(sub {
$class->can($_) if defined $_;
}
, @creation_chain) |
|
300
|
18 |
7 |
unless defined $params{'command_chain'} |
|
304
|
15 |
10 |
if ($cmd) { } |
|
308
|
9 |
6 |
if $cmd->can('_build_command_creation_method_name') |
|
310
|
9 |
6 |
if $creation_method_name |
|
311
|
9 |
6 |
if ($creation_method) { } |
|
320
|
12 |
0 |
if defined $_ |
|
|
0 |
6 |
unless $creation_method = first_result(sub {
$cmd->can($_) if defined $_;
}
, @creation_chain) |
|
326
|
0 |
6 |
$cemn ? : |
|
327
|
3 |
3 |
if $self->command_execute_from_new |
|
334
|
4 |
6 |
if $self->command_execute_from_new |