| line |
true |
false |
branch |
|
51
|
0 |
0 |
unless open my $fh, '>>', $file |
|
75
|
0 |
0 |
if (@ready) |
|
88
|
0 |
0 |
unless $$self{'fifofh'} |
|
96
|
0 |
0 |
unless ($$self{'fifofile'}) |
|
101
|
0 |
0 |
unless mkfifo($fifofile, 511) |
|
105
|
0 |
0 |
unless ($$self{'fifofh'}) |
|
109
|
0 |
0 |
unless open my $fifofh, '+<', $fifofile |
|
121
|
0 |
0 |
unless seek $fh, 0, 0 |
|
136
|
0 |
0 |
unless seek $fh, $pos, 0 |
|
150
|
0 |
0 |
unless seek $fh, 0, 0 |
|
158
|
0 |
0 |
unless defined $line |
|
159
|
0 |
0 |
if ($line =~ /^#/ or $line =~ /^$/) { } |
|
162
|
0 |
0 |
unless (defined $found_pos) |
|
168
|
0 |
0 |
if $found_len >= $need_len |
|
176
|
0 |
0 |
if (defined $found_pos) { } |
|
181
|
0 |
0 |
unless seek $fh, $found_pos, 0 |
|
183
|
0 |
0 |
if $found_len > $need_len + 1 |
|
187
|
0 |
0 |
unless seek $fh, 0, 2 |
|
202
|
0 |
0 |
unless open my $fifofh, '+>', $fifofile |
|
237
|
0 |
0 |
if 0 < $$self{'lock_count'}++ |
|
240
|
0 |
0 |
unless open my $fh, '+<', $file |
|
242
|
0 |
0 |
unless flock $fh, 2 |
|
260
|
0 |
0 |
unless $self->is_locked |
|
262
|
0 |
0 |
if $$self{'notified'} |
|
265
|
0 |
0 |
unless seek $fh, 0, 0 |
|
270
|
0 |
0 |
if /^\s*#/ or /^\s*$/ |
|
302
|
0 |
0 |
unless $self->is_locked |
|
311
|
0 |
0 |
unless flock $$self{'fh'}, 8 |
|
324
|
0 |
0 |
unless flock $$self{'fh'}, 2 |
|
331
|
0 |
0 |
unless ($ENV{'LEAVEIT'}) |
|
352
|
0 |
0 |
if 0 < --$$self{'lock_count'} |