lib/IO/Lines.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 12 | 18 | 66.6 |
line | true | false | branch |
---|---|---|---|
61 | 2 | 27 | if (not defined $/) { } |
27 | 0 | elsif ($/ eq "\n") { } | |
65 | 26 | 1 | if (not *$self->{'Pos'}) { } |
90 | 0 | 2 | unless wantarray |
92 | 2 | 0 | if (defined $/ and $/ eq "\n") { } |
113 | 0 | 4 | if ($Pos) |
130 | 0 | 7 | if (defined $\ and $\ ne "\n") |
136 | 0 | 7 | unless @lines |
140 | 4 | 3 | if (@{*$self->{'AR'};} and not *$self->{'AR'}[-1] =~ /\n\Z/) |