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 |