line |
true |
false |
branch |
34
|
0 |
1 |
if exists $ENV{'SILENT_SYS_RUNALONE'} |
35
|
0 |
1 |
if exists $ENV{'RETRY_SYS_RUNALONE'} |
38
|
0 |
1 |
if (my $skip = $ENV{'SKIP_SYS_RUNALONE'}) { } |
|
0 |
1 |
elsif (tell main::DATA == -1) { } |
39
|
0 |
0 |
if not $silent and $skip > 1 |
49
|
0 |
0 |
if (tell do {
$data_pkg
} == -1) |
57
|
0 |
1 |
unless (flock do {
$data_pkg
}, 6) |
60
|
0 |
0 |
if ($retry) |
61
|
0 |
0 |
unless $silent |
68
|
0 |
0 |
if flock do {
$data_pkg
}, 6 |
70
|
0 |
0 |
unless $silent |
74
|
0 |
0 |
unless $silent |
96
|
0 |
0 |
if @_ == 1 and $_[0] and $_[0] eq 'silent' |
99
|
0 |
1 |
if (@_ & 1) == 1 |
107
|
0 |
1 |
if (my(@huh) = sort(keys %args)) |