Branch Coverage

inc/Test/TCP.pm
Criterion Covered Total %
branch 15 34 44.1


line true false branch
24 0 4 unless exists $args{$k}
37 2 0 unless Net::EmptyPort::wait_port($port, 0.1, 100)
46 0 2 @_ == 1 ? :
47 0 2 unless exists $args{'code'}
53 0 2 unless exists $$self{'port'}
54 2 0 if $$self{'auto_start'}
64 2 0 if (my $pid = fork) { }
0 0 elsif ($pid == 0) { }
73 0 0 if (kill 0, $$self{'_my_pid'})
85 0 2 unless defined $$self{'pid'}
86 0 2 unless $$self{'_my_pid'} == $$
97 0 2 if $^O eq 'MSWin32'
101 0 2 if $^O eq 'MSWin32'
107 4 0 if ($^O ne 'MSWin32')
108 0 4 if (POSIX::WIFSIGNALED($?))
110 0 0 if ($signame =~ /^(ABRT|PIPE)$/)
115 2 2 if ($kid == 0 or $kid == -1)