| blib/lib/Text/ZPL/Stream.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 16 | 18 | 88.8 |
| line | true | false | branch |
|---|---|---|---|
| 35 | 1145 | 0 | defined $_[0][0] ? : |
| 58 | 12 | 56 | unless (Text::ZPL::_decode_prepare_line($line)) |
| 73 | 38 | 17 | if ((my $sep_pos = index($line, '=')) > 0) |
| 86 | 17 | 0 | if (my($subsect) = $line =~ /^(?:\s+)?($re)(?:\s+?#.*)?$/) |
| 111 | 2 | 1196 | if ($chr eq "\r") |
| 118 | 67 | 1129 | if ($chr eq "\n") |
| 119 | 1 | 66 | if ($self->_maybe_extra_eol) { } |
| 128 | 1 | 1128 | if $self->_maybe_extra_eol |
| 130 | 1 | 1128 | if $self->max_buffer_size and length $$self[1] >= $self->max_buffer_size |