blib/lib/IO/Buffered/Regexp.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 11 | 16 | 68.7 |
line | true | false | branch |
---|---|---|---|
60 | 4 | 0 | unless defined $regexp and ref $regexp eq 'Regexp' || ref $regexp eq '' && $regexp ne '' |
64 | 0 | 2 | if $opts{'MaxSize'} and not $opts{'MaxSize'} =~ /^\d+$/ && $opts{'MaxSize'} > 0 |
67 | 1 | 1 | exists $opts{'ReturnsLast'} ? : |
104 | 2 | 2 | if (my $maxsize = $$self{'maxsize'}) |
106 | 0 | 2 | if ($length > $maxsize) |
121 | 0 | 8 | if ($$self{'double'}) { } |
131 | 6 | 0 | if ($1 ne '') { } |
157 | 2 | 2 | if $$self{'buffer'} ne '' |