| blib/lib/Tak/JSONChannel.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 0 | 14 | 0.0 |
| line | true | false | branch |
|---|---|---|---|
| 19 | 0 | 0 | if (sysread($self->read_fh, $$rb, 1024, length $$rb) > 0) { } |
| 23 | 0 | 0 | if (my $unpacked = $self->_unpack_line($line)) |
| 36 | 0 | 0 | unless ($data) |
| 40 | 0 | 0 | unless (ref $data eq 'ARRAY') |
| 44 | 0 | 0 | unless (@$data > 0) |
| 54 | 0 | 0 | unless ($json) |
| 70 | 0 | 0 | unless print {$self->write_fh;} $raw . "\n" |