blib/lib/File/ReadBackwards.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 18 | 24 | 75.0 |
line | true | false | branch |
---|---|---|---|
28 | 0 | 2 | if ($^O =~ /win32/i or $^O =~ /vms/i) { } |
0 | 2 | elsif ($^O =~ /mac/i) { } | |
63 | 0 | 70 | unless defined $filename |
74 | 0 | 70 | unless sysopen $handle, $filename, 0 |
79 | 0 | 70 | unless my $seek_pos = sysseek($handle, 0, 2) |
115 | 1 | 41525 | unless $lines_ref |
121 | 41441 | 196 | if (@{$lines_ref;} > 1) |
127 | 20719 | 20722 | if $self->{'is_crlf'} |
138 | 84 | 112 | if ($seek_pos == 0) |
145 | 24 | 24 | if @{$lines_ref;} and $self->{'is_crlf'} |
172 | 46 | 66 | if @{$lines_ref;} |
178 | 0 | 112 | $self->{'sep_is_regex'} ? : |