Still hangs in 0.006
Show quoted text>perl -Mblib t\01-basic.t
1..4
ok 1 - Will start to write on w1
ok 2 - Will read from r2
(hangs)
Show quoted text>perl -Mblib t\02-socket.t
#[MAIN] will fork server
#[MAIN] Will setup the pipes
#[MAIN] Will fork the client
Died at t\02-socket.t line 26.
1..12
#[CLIENT] starting loop.
#[CLIENT] wrote line this.
#[CLIENT] wrote line is.
#[CLIENT] wrote line our.
#[CLIENT] wrote line test.
#[CLIENT] wrote line set.
#[CLIENT] wrote line of.
#[CLIENT] wrote line strings.
#[CLIENT] wrote line to.
#[CLIENT] wrote line be.
#[CLIENT] wrote line sent.
#[CLIENT] wrote line lower.
#[CLIENT] wrote line case.
#[CLIENT] out of write loop.
Died at t\02-socket.t line 99.
#[CLIENT] read it all.
not ok 1
# Failed test at t\02-socket.t line 85.
# got: undef
# expected: 'THIS'
not ok 2
# Failed test at t\02-socket.t line 85.
# got: undef
# expected: 'IS'
not ok 3
# Failed test at t\02-socket.t line 85.
# got: undef
# expected: 'OUR'
not ok 4
# Failed test at t\02-socket.t line 85.
# got: undef
# expected: 'TEST'
not ok 5
# Failed test at t\02-socket.t line 85.
# got: undef
# expected: 'SET'
not ok 6
# Failed test at t\02-socket.t line 85.
# got: undef
# expected: 'OF'
not ok 7
# Failed test at t\02-socket.t line 85.
# got: undef
# expected: 'STRINGS'
not ok 8
# Failed test at t\02-socket.t line 85.
# got: undef
# expected: 'TO'
not ok 9
# Failed test at t\02-socket.t line 85.
# got: undef
# expected: 'BE'
not ok 10
# Failed test at t\02-socket.t line 85.
# got: undef
# expected: 'SENT'
not ok 11
# Failed test at t\02-socket.t line 85.
# got: undef
# expected: 'LOWER'
not ok 12
# Failed test at t\02-socket.t line 85.
# got: undef
# expected: 'CASE'
# Looks like you failed 12 tests of 12.
#[MAIN] we sleep to give time for the server to start
#[MAIN] setup the proxy
--
Alexandr Ciornii,
http://chorny.net