Branch Coverage

blib/lib/goto/file.pm
Criterion Covered Total %
branch 15 16 93.7


line true false branch
16 2 5 unless $in
21 1 4 if (ref $in eq 'ARRAY') { }
39 0 4 unless open $fh, '<', $in
60 5 81 unless ($self->{'init'})
62 5 18 unless &filter_read()
70 30 56 if (@$lines) { }
55 1 elsif ($fh) { }
82 83 3 if (defined $line)