| line |
true |
false |
branch |
|
61
|
0 |
3 |
if (not $_test_mode) |
|
62
|
0 |
0 |
if ($where =~ /stderr/iu) { } |
|
87
|
0 |
0 |
if (exists $_app_simple_objects{'logger'}) { } |
|
90
|
0 |
0 |
if defined $_app_simple_objects{'logger'} |
|
102
|
0 |
0 |
if (not $func or ref $func ne 'CODE') { } |
|
114
|
0 |
11 |
@_ % 2 ? : |
|
119
|
0 |
11 |
if ($args{'log_file'}) |
|
123
|
0 |
11 |
if ($args{'debug'}) |
|
128
|
11 |
0 |
if $args{'help_text'} |
|
129
|
0 |
11 |
if $args{'help_cmdline'} |
|
131
|
0 |
11 |
if ref $args{'options'} ne 'HASH' |
|
157
|
15 |
10 |
if (ref $args{'options'}{$o} eq 'HASH') { } |
|
158
|
1 |
14 |
unless $args{'options'}{$o}{'desc'} |
|
161
|
8 |
6 |
if $full_options{$name}{'required'} |
|
180
|
14 |
10 |
if ($name ne 'help') |
|
185
|
8 |
6 |
if $full_options{$name}{'required'} |
|
187
|
4 |
10 |
if $full_options{$name}{'default'} |
|
194
|
8 |
2 |
if ($has_required) |
|
195
|
0 |
8 |
$has_required > 1 ? : |
|
199
|
0 |
10 |
$args{'ctrl_c'} ? : |
|
203
|
0 |
10 |
if $args{'cleanup'} |
|
209
|
0 |
10 |
if $_cmd_line_options{'help'} |
|
213
|
0 |
20 |
unless $full_options{$name}{'desc'} |
|
214
|
8 |
12 |
if ($full_options{$name}{'required'}) |
|
215
|
1 |
7 |
unless $_cmd_line_options{$name} or $full_options{$name}{'default'} |
|
217
|
6 |
13 |
if ($full_options{$name}{'depends'}) |
|
218
|
1 |
5 |
unless ($_cmd_line_options{$full_options{$name}{'depends'}}) |
|
224
|
4 |
14 |
if ($full_options{$name}{'default'}) |
|
225
|
0 |
4 |
unless $_cmd_line_options{$name} |
|
229
|
3 |
15 |
if ($_cmd_line_options{$name} and $full_options{$name}{'validate'}) |
|
230
|
0 |
3 |
if !ref($full_options{$name}{'validate'}) eq 'CODE' |
|
231
|
0 |
3 |
unless $full_options{$name}{'required'} or $full_options{$name}{'default'} |
|
235
|
1 |
1 |
unless $result |
|
262
|
0 |
0 |
if $_app_simple_ctrlc_count++ |
|
277
|
3 |
0 |
if ($_test_mode) |
|
298
|
3 |
0 |
if ($msg) { } |
|
318
|
0 |
0 |
if $msg |
|
328
|
0 |
0 |
if ($rootdir) |
|
329
|
0 |
0 |
unless chroot $rootdir |
|
338
|
0 |
0 |
if ($pid) |
|
341
|
0 |
0 |
unless defined $pid |
|
346
|
0 |
0 |
unless POSIX::setsid() |
|
357
|
0 |
0 |
unless my $command = $args{'command'} |
|
386
|
0 |
9 |
unless $file |
|
390
|
1 |
8 |
if ($file =~ m[^\.\./]u) |
|
394
|
2 |
7 |
if ($file =~ m[^\./]u or $file eq '.') |
|
417
|
26 |
22 |
length $_ > 1 ? : |
|
439
|
0 |
2 |
if ($_app_simple_cleanup_func) |