| line |
true |
false |
branch |
|
24
|
0 |
0 |
if (exists $!{$mnemonic}) { } |
|
34
|
0 |
972 |
$INC{'threads.pm'} ? : |
|
40
|
0 |
0 |
if ($op & 4) |
|
43
|
0 |
0 |
if ($op & 2) |
|
46
|
0 |
0 |
if ($op & 8) |
|
56
|
0 |
243 |
unless (-d $dir) |
|
61
|
0 |
0 |
if (not -r $dir and -w $dir and -x $dir) |
|
74
|
0 |
201 |
if $_DEBUG |
|
75
|
0 |
201 |
if (defined $timeout and &Time::HiRes::time() > $expire) |
|
76
|
0 |
0 |
if $_DEBUG |
|
81
|
0 |
201 |
if (&Time::HiRes::time() > $last_check + $HEARTBEAT_CHECK) |
|
82
|
0 |
0 |
if $_DEBUG |
|
87
|
0 |
243 |
if $_DEBUG |
|
97
|
0 |
243 |
if $_DEBUG |
|
109
|
11 |
0 |
if (-f $rootdir and not -d $rootdir) |
|
123
|
444 |
0 |
if (opendir $dh, $dir) |
|
134
|
0 |
503 |
unless $Dir::Flock::a->[1] <=> $Dir::Flock::b->[1] |
|
136
|
0 |
444 |
if $_DEBUG |
|
137
|
444 |
0 |
if @F |
|
143
|
0 |
0 |
unless $file |
|
144
|
0 |
0 |
unless open my $fh, '<', "$dir/$file" |
|
149
|
0 |
0 |
if $_DEBUG |
|
150
|
0 |
0 |
if ($host eq $ENV{'HOSTNAME'} or $host eq 'localhost') { } |
|
155
|
0 |
0 |
if $_DEBUG |
|
160
|
0 |
0 |
if $_DEBUG |
|
163
|
0 |
0 |
if (not $status) |
|
179
|
0 |
243 |
unless (defined $LOCK{$dir}) |
|
180
|
0 |
0 |
unless (&__inGD() or $Dir::Flock::SUPPRESS_RELOCK_WARNINGS) |
|
186
|
0 |
243 |
if ($LOCK{$dir}[0] ne _pid()) |
|
187
|
0 |
0 |
unless &__inGD() |
|
190
|
0 |
243 |
if $_DEBUG |
|
191
|
0 |
243 |
unless (-f "$dir/$LOCK{$dir}[1]") |
|
193
|
0 |
0 |
unless &__inGD() |
|
198
|
0 |
243 |
unless ($z) |
|
200
|
0 |
0 |
unless &__inGD() |
|
207
|
6 |
0 |
if (defined ${^GLOBAL_PHASE}) { } |
|
208
|
0 |
0 |
if %{^GLOBAL_PHASE} eq 'DESTRUCT' |