| inc/Pegex/Input.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 9 | 20 | 45.0 |
| line | true | false | branch |
|---|---|---|---|
| 17 | 0 | 4 | unless $$self{'_is_open'} |
| 18 | 0 | 4 | if $$self{'_is_eof'} |
| 29 | 0 | 4 | if $$self{'_is_open'} or $$self{'_is_close'} |
| 32 | 0 | 4 | if (my $ref = $$self{'stringref'}) { } |
| 0 | 4 | elsif (my $handle = $$self{'handle'}) { } | |
| 0 | 4 | elsif (my $path = $$self{'file'}) { } | |
| 4 | 0 | elsif (exists $$self{'string'}) { } | |
| 39 | 0 | 0 | unless CORE::open my $handle, $path |
| 55 | 0 | 4 | if $$self{'_is_close'} |
| 57 | 0 | 4 | if $$self{'handle'} |