Branch Coverage

blib/lib/Sys/RunAlone/Flexible.pm
Criterion Covered Total %
branch 7 30 23.3


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))