Branch Coverage

blib/lib/AtteanX/API/Lexer.pm
Criterion Covered Total %
branch 14 22 63.6


line true false branch
73 183 0 unless (length $self->buffer)
75 117 66 if defined $line
88 0 32 if defined $c and $c eq "\x{feff}"
102 0 600 if $c ne $char
115 0 857 if ($c eq "\n") { }
134 337 1245 if (length $self->{'buffer'} == 0)
136 305 32 if length $self->{'buffer'} == 0
152 0 88 if substr($self->{'buffer'}, 0, length $word) ne $word
158 0 88 if ($lines) { }
178 0 0 if length $self->{'buffer'} == $curlen
186 123 1783 if ($lines) { }