Branch Coverage

inc/Pegex/Input.pm
Criterion Covered Total %
branch 9 20 45.0


line true false branch
17 0 8 unless $$self{'_is_open'}
18 0 8 if $$self{'_is_eof'}
29 0 8 if $$self{'_is_open'} or $$self{'_is_close'}
32 0 8 if (my $ref = $$self{'stringref'}) { }
0 8 elsif (my $handle = $$self{'handle'}) { }
0 8 elsif (my $path = $$self{'file'}) { }
8 0 elsif (exists $$self{'string'}) { }
39 0 0 unless CORE::open my $handle, $path
55 0 8 if $$self{'_is_close'}
57 0 8 if $$self{'handle'}