Branch Coverage

blib/lib/App/TimelogTxt/File.pm
Criterion Covered Total %
branch 13 16 81.2


line true false branch
11 1 13 unless defined $fh
12 1 12 unless defined $start
13 1 11 unless defined $end
14 0 11 unless (ref $fh)
16 0 0 unless open $fh, '<', $name
34 8 35 if $$self{'stage'} > 1 or eof $$self{'fh'}
37 11 24 if ($$self{'stage'} == 0) { }
47 26 9 if not defined $line or substr($line, 0, $$self{'endlen'}) lt $$self{'end'}