Branch Coverage

blib/lib/Net/Server/Proto/UNIXDGRAM.pm
Criterion Covered Total %
branch 12 22 54.5


line true false branch
31 4 1 if @_
32 4 1 if @_
45 1 3 defined $udp->{'udp_recv_len'} ? :
0 4 defined $info->{'udp_recv_len'} ? :
47 4 0 $len =~ /^(\d+)$/ ? :
50 0 4 defined $udp->{'udp_recv_flags'} ? :
0 4 defined $info->{'udp_recv_flags'} ? :
52 4 0 $flg =~ /^(\d+)$/ ? :
55 4 0 $info->{'port'} =~ m[^ ([\w\.\-\*\/]+) $ ]x ? :
65 0 0 if -e $path and not unlink($path)
67 0 0 unless $sock->SUPER::configure({'Local', $path, 'Type', 2})