Branch Coverage

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"