Branch Coverage

blib/lib/Net/NBsocket.pm
Criterion Covered Total %
branch 48 92 52.1


line true false branch
97 16 0 if $pa[$pai] == $af
100 16 0 unless ($pai)
101 0 16 if $pa[0] == $pa[1]
104 16 0 wantarray ? :
161 1 1 wantarray ? :
174 5 0 if $lsock and set_NB($lsock)
175 0 0 if $lsock
192 6 3 if wantarray
193 1 2 if @rv
200 0 0 if wantarray
201 0 0 if @rv
333 5 2 unless $AF
335 7 0 if socket $usock, $AF, 2, UDP() and set_NB($usock)
336 0 0 if $usock
397 5 0 unless $AF
398 0 5 if $AF == AF_INET6() and not isupport6()
399 2 3 unless ($addr)
400 0 2 if ($AF == AF_INET6()) { }
406 0 5 if ($AF == AF_INET6()) { }
407 0 0 unless length $addr == 16
409 0 5 unless length $addr == 4
413 1 4 if ($port_path and $port_path =~ /[\D\s]/) { }
414 0 1 unless socket $lsock, 1, 1, 0
416 1 0 if ($sockok)
417 0 1 if -e $port_path and -S $port_path
421 0 4 unless socket $lsock, $AF, 1, TCP()
423 4 0 if ($sockok)
424 0 4 if ($AF == AF_INET6()) { }
431 5 0 if $sockok and listen $lsock, 128
433 0 0 if $lsock
458 5 0 unless $AF
462 0 5 unless $port_path
463 1 4 if ($port_path =~ /\D/) { }
0 4 elsif ($AF == AF_INET6()) { }
469 0 0 unless length $netaddr == 16
472 0 4 unless length $netaddr == 4
475 0 5 unless $daddr and socket $csock, $AF, 1, $proto
476 5 0 if ($block or set_NB($csock))
477 5 0 if connect $csock, $daddr or $! == 115
504 0 9 unless $server
507 4 5 unless $paddr
513 4 1 if ($af == 2) { }
0 1 elsif ($af == AF_INET6()) { }
522 5 0 if $netaddr and $block || set_NB($clone)
540 20 0 if (defined $main::POSIX::{'F_GETFL'}) { }
571 2 0 length $netaddr == 16 ? :