Select Code to Download

"This patch was applied at 1.13. (Note, but it's still failing.)"

Dubious, test returned 9 (wstat 2304, 0x900)
All x subtests passed

[Test::TCP] Child process does not block(PID: -xxxx, PPID: xxxx) at ..
+. \lib/Test/TCP.pm line 121.
t/xxxx.t ................. ok

sub start {
    my $self = shift;
...
        die "fork failed: $!";
    }
}

[Test::TCP] Child process does not block(PID: -xxxx, PPID: xxxx) at ..
+. /Test/TCP.pm line 121.
Cannot open client socket: No connection could be made because the tar
+get machine actively refused it. at t/10_oo.t line 21.
...
t/xxxx.t ................... 
Dubious, test returned 77 (wstat 19712, 0x4d00)
Failed 2/22 subtests

my $sock = IO::Socket::INET->new(
    PeerPort => $server->port,
    PeerAddr => '127.0.0.1',
    Proto    => 'tcp'
) or die "Cannot open client socket: $!";

[Test::TCP] Child process does not block(PID: -xxxx, PPID: xxxx) at ..
+. lib/Test/TCP.pm line 121.

...
t/09_fork.t ................. 
Dubious, test returned 1 (wstat 256, 0x100)
Failed 2/6 subtests

        # after the child has exited, we need to make sure that
        # the server hasn't gone away.
...
        if (! ok $sock, "socket is connected") { #line 35
            return diag("Cannot open client socket: $!");
        }