| line |
true |
false |
branch |
|
26
|
0 |
1 |
unless sysopen my $fh, $filename, 194 |
|
29
|
0 |
1 |
unless $wlen == 16 * $max_workers |
|
44
|
0 |
101 |
unless sysseek $$self{'fh'}, 0, 0 |
|
46
|
0 |
101 |
unless sysread($$self{'fh'}, my $sb, $$self{'max_workers'} * 16) == $$self{'max_workers'} * 16 |
|
49
|
1010 |
0 |
$_ =~ /^(.)/ ? : |
|
59
|
0 |
10 |
unless sysseek $$self{'fh'}, 0, 0 |
|
63
|
0 |
55 |
unless $rlen == 16 |
|
65
|
10 |
45 |
if ($data =~ /^.${pid}[ ]*\n$/) |
|
67
|
0 |
10 |
unless sysseek $$self{'fh'}, 16 * $slot, 0 |
|
70
|
0 |
10 |
unless $wlen == 16 |
|
81
|
0 |
0 |
if defined $$self{'slot'} |
|
83
|
0 |
0 |
unless close $$self{'fh'} |
|
85
|
0 |
0 |
unless sysopen $$self{'fh'}, $$self{'filename'}, 2 |
|
92
|
0 |
0 |
if $rlen != 16 |
|
94
|
0 |
0 |
if ($data =~ /^.[ ]+\n$/o) |
|
98
|
0 |
0 |
if $$self{'slot'} >= $$self{'max_workers'} |
|
105
|
0 |
0 |
unless defined $$self{'slot'} |
|
107
|
0 |
0 |
unless sysseek $$self{'fh'}, $$self{'slot'} * 16, 0 |
|
110
|
0 |
0 |
unless $wlen == 16 |
|
117
|
0 |
10 |
unless flock $fh, 2 |
|
121
|
0 |
10 |
unless flock $fh, 8 |