| line |
true |
false |
branch |
|
13
|
0 |
6 |
if ($code_conf->{'cli_opt_key'}) |
|
41
|
1 |
5 |
if (my $before_run = $code_conf->{'before_run'}) |
|
44
|
3 |
3 |
if (ref $arg eq 'CODE') { } |
|
52
|
1 |
4 |
if (my $after_run = $code_conf->{'after_run'}) |
|
56
|
1 |
5 |
if (my $e = $@) |
|
57
|
0 |
1 |
if ($code_conf->{'on_error'}) { } |
|
88
|
0 |
1 |
unless Getopt::Long::GetOptionsFromArray(\@cli_args, %options, 'h', sub {
$c->show_usage(-'exitval', 1);
}
, 'help', sub {
$c->show_usage(-'exitval', 1, -'verbose', 2);
}
) |
|
96
|
0 |
1 |
unless ref $opt eq 'HASH' |
|
106
|
0 |
1 |
if (not defined $opt_key or $opt_key eq '') |