Branch Coverage

blib/lib/AnyEvent/Fork/Remote.pm
Criterion Covered Total %
branch 16 34 47.0


line true false branch
241 0 0 unless my $fh = shift @fh
259 0 1 unless my($a, $b) = AnyEvent::Util::portable_socketpair()
262 0 1 unless open my $oldin, '<&0'
263 0 1 unless open my $oldout, '>&1'
265 0 1 unless open STDIN, '<&' . fileno($b)
266 0 1 unless open STDOUT, '>&' . fileno($b)
268 0 1 $p ? :
336 3 0 unless $s =~ /'/u
354 0 1 if length $linecode > 70
426 0 1 unless my $fh = shift()
429 1 0 length $ENV{'HOSTNAME'} ? :
446 1 0 if ($len or $! == 11 or $! == 11) { }
448 1 0 if $ofs >= length $code
460 1 0 if ($len or $! == 11 or $! == 11) { }
461 0 1 if length $rbuf > length $magic0
463 1 0 if ($rbuf eq ($magic0 ^ $magic1))
469 0 1 if $ww