line |
true |
false |
branch |
31
|
0 |
239 |
if (exists $t{'skip'} and $t{'skip'}->()) |
36
|
0 |
239 |
exists $t{'env'} ? : |
38
|
0 |
239 |
if @envs |
39
|
0 |
239 |
if (@envs) |
44
|
0 |
239 |
if (exists $t{'pre'} and not $t{'pre'}->()) |
50
|
236 |
3 |
if (eval {
do {
$t{'cmd'}[0]->isa('App::NDTools::NDTool')
}
}) { } |
58
|
236 |
0 |
if (&blessed($@) and $@->isa('Log::Log4Cli::Exception')) { } |
75
|
0 |
478 |
if exists $t{$std} and not defined $t{$std} |
76
|
314 |
164 |
unless exists $t{$std} |
79
|
239 |
239 |
$std eq 'stdout' ? : |
81
|
111 |
367 |
if (ref $t{$std} eq 'CODE') { } |
|
50 |
317 |
elsif (ref $t{$std} eq 'Regexp') { } |
90
|
239 |
0 |
if (not exists $t{'exit'} or defined $t{'exit'}) |
91
|
128 |
111 |
unless exists $t{'exit'} |
98
|
84 |
155 |
if exists $t{'test'} |
100
|
0 |
239 |
if (exists $t{'post'} and not $t{'post'}->()) |
105
|
239 |
0 |
if (not exists $t{'clean'} or defined $t{'clean'}) |
106
|
232 |
7 |
unless exists $t{'clean'} |
107
|
115 |
131 |
if -f $_ |