Branch Coverage

blib/lib/File/Tail.pm
Criterion Covered Total %
branch 69 164 42.0


line true false branch
32 18 94 if (@_)
34 3 15 if $$object{'interval'} > $$object{'maxinterval'}
43 0 0 if $object->debug
54 9 32 if @_
60 0 0 if @_
68 9 0 if (@_ >= 2)
70 0 9 unless defined $mode
71 0 9 if (ref $mode eq 'CODE') { }
0 9 elsif (ref $mode eq 'ARRAY') { }
74 0 0 unless (ref $$mode[0] eq 'CODE')
90 0 0 if (@_ > 0)
107 0 0 if (@_ >= 1) { }
114 0 0 if (ref $mode eq 'CODE') { }
0 0 elsif (ref $mode eq 'ARRAY') { }
0 0 elsif ($mode eq 'return') { }
0 0 elsif ($mode eq 'warn') { }
136 9 0 if @_
142 0 0 if @_
148 0 0 if @_
154 0 23 if @_
160 9 0 if @_
166 9 10 if @_
172 9 9 if @_
178 9 0 if @_
184 0 0 if @_
190 0 0 if @_
220 14 0 if defined $this and defined $$this{'handle'}
232 0 9 unless ($pkg)
236 0 9 if ($#_ == 0) { }
239 0 9 if ($#_ % 2 != 1)
247 0 9 unless (defined $params{'name'})
266 0 9 if (defined $params{'reset_tail'}) { }
277 9 0 if ($$object{'method'} eq 'tail')
292 2 10 if (not $$object{'tail'}) { }
4 6 elsif ($$object{'tail'} < 0) { }
303 6 0 unless $avlen
305 0 6 if $calclen <= length $$object{'buffer'}
306 6 0 if $calclen > $maxlen
310 0 6 if $File::Tail::Is_Win32
313 6 0 if $calclen >= $maxlen
317 4 2 if ($crs > $$object{'tail'})
350 1 10 if ($oldhandle and $$object{'name_changes_callback'}) { }
356 0 11 unless (open $newhandle, "<$newname")
357 0 0 if ($$object{'ignore_nonexistant'})
362 0 0 unless ($oldhandle)
369 0 0 unless defined $$object{'endpos'}
370 0 0 unless defined $$object{'curpos'}
375 2 9 if (defined $oldhandle) { }
387 1 1 if ($st->mtime <= int $$object{'lastread'}) { }
388 0 1 if ($st->size == $$object{'curpos'}) { }
415 0 23 unless ($$object{'handle'})
417 0 0 unless ($$object{'handle'})
423 1 22 if ($$object{'endpos'} < $$object{'curpos'}) { }
2 23 elsif ($$object{'curpos'} == $$object{'endpos'} and time - $$object{'lastread'} > $$object{'resetafter'}) { }
431 6 17 if ($$object{'endpos'} - $$object{'curpos'})
442 6 23 if $crs
444 0 23 if $ttw > 0
445 0 23 if (my $len = $object->checkpending)
449 2 21 if ($$object{'sleepcount'} > $object->adjustafter)
459 0 0 unless defined $_[0]
464 0 0 if ref $_[0]
466 0 0 unless defined $object
469 0 0 if (defined $timeout) { }
477 0 0 if $minpred > $val
481 0 0 defined $timeout ? :
489 0 0 if (defined $timeout) { }
497 0 0 unless $val
498 0 0 if $minpred > $val
499 0 0 unless $val
502 0 0 if (wantarray) { }
512 0 7 if (length $$object{'buffer'})
515 0 0 if $crs
517 0 7 if $len > $$object{'maxbuf'}
522 0 7 if $File::Tail::Is_Win32
524 0 7 if $len == 0
535 7 0 if ($crs)
537 0 7 if $$object{'lastread'} > $tmp
552 0 23 if ($object->nowait)
553 0 0 if (wantarray) { }
559 23 0 if $object->interval > 0
565 1 12 if (not length $$object{'buffer'} or index($$object{'buffer'}, "\n") < 0)
568 6 7 if (not wantarray) { }