Skip Menu |

This queue is for tickets about the IO-Socket-IP CPAN distribution.

Report information
The Basics
Id: 79393
Status: resolved
Priority: 0/
Queue: IO-Socket-IP

People
Owner: Nobody in particular
Requestors: ahmad.zawawi [...] gmail.com
Cc:
AdminCc:

Bug Information
Severity: Critical
Broken in: 0.17
Fixed in: 0.18



Subject: IO::Socket::IP 0.17 failure on win32
Hi, It seems that IO::Socket::IP fails on windows 7. Here is the log: .... ==> Found dependencies: IO::Socket::IP Searching IO::Socket::IP on cpanmetadb ... --> Working on IO::Socket::IP Fetching http://www.cpan.org/authors/id/P/PE/PEVANS/IO-Socket-IP- 0.17.tar.gz -> OK Unpacking IO-Socket-IP-0.17.tar.gz Entering IO-Socket-IP-0.17 Checking configure dependencies from META.yml Configuring IO-Socket-IP-0.17 Running Build.PL Created MYMETA.yml and MYMETA.json Creating new 'Build' script for 'IO-Socket-IP' version '0.17' -> OK Checking dependencies from MYMETA.json ... Checking if you have Test::More 0 ... Yes (0.98) Checking if you have IO::Socket 0 ... Yes (1.34) Checking if you have Socket 1.97 ... Yes (2.006) Building and testing IO-Socket-IP-0.17 Building IO-Socket-IP t\00use.t ........................... ok t\01local-client-v4.t ............... ok t\02local-server-v4.t ............... ok t\03local-cross-v4.t ................ ok t\04local-client-v6.t ............... skipped: Unable to bind to ::1 t\05local-server-v6.t ............... skipped: Unable to bind to ::1 t\06local-cross-v6.t ................ skipped: Unable to bind to ::1 t\10args.t .......................... ok t\11sockopts.t ...................... ok t\12port-fallback.t ................. ok t\13addrinfo.t ...................... ok t\14fileno.t ........................ ok t\15io-socket.t ..................... ok t\16v6only.t ........................ skipped: Unable to bind to ::1 t\17gai-flags.t ..................... ok t\20nonblocking-connect.t ........... ok # Looks like you planned 9 tests but ran 10. t\21nonblocking-connect-internet.t .. Dubious, test returned 255 (wstat 65280, 0xff00) All 9 subtests passed (less 5 skipped subtests: 4 okay) t\99pod.t ........................... ok Test Summary Report ------------------- t\21nonblocking-connect-internet.t (Wstat: 65280 Tests: 10 Failed: 1) Failed test: 10 Non-zero exit status: 255 Parse errors: Bad plan. You planned 9 tests but ran 10. Files=18, Tests=115, 37 wallclock secs ( 0.11 usr + 0.06 sys = 0.17 CPU) Result: FAIL Failed 1/18 test programs. 1/115 subtests failed. -> FAIL Installing IO::Socket::IP failed.
Oops. Bad skip() count on one of the unit tests. Now fixed upstream. Will be in next version. -- Paul Evans
Subject: rt79393.patch
=== modified file 't/21nonblocking-connect-internet.t' --- t/21nonblocking-connect-internet.t 2012-08-16 19:26:39 +0000 +++ t/21nonblocking-connect-internet.t 2012-09-17 22:13:10 +0000 @@ -18,7 +18,7 @@ PeerHost => $test_host, PeerPort => $test_good_port, Type => SOCK_STREAM, - ) or skip "Can't connect to $test_host:$test_good_port", 6; + ) or skip "Can't connect to $test_host:$test_good_port", 5; my $socket = IO::Socket::IP->new( PeerHost => $test_host, @@ -55,8 +55,8 @@ PeerHost => $test_host, PeerPort => $test_bad_port, Type => SOCK_STREAM, - ) and skip "Connecting to $test_host:$test_bad_port succeeds", 5; - $! == ECONNREFUSED or skip "Connecting to $test_host:$test_bad_port doesn't give ECONNREFUSED", 5; + ) and skip "Connecting to $test_host:$test_bad_port succeeds", 4; + $! == ECONNREFUSED or skip "Connecting to $test_host:$test_bad_port doesn't give ECONNREFUSED", 4; my $socket = IO::Socket::IP->new( PeerHost => $test_host,