1# test delay before server write when reverse sending 2 3use strict; 4use warnings; 5 6our %args = ( 7 client => { 8 func => \&read_stream, 9 }, 10 relay => { 11 func => sub { ioflip(@_); relay(@_); }, 12 }, 13 server => { 14 func => sub { sleep 3; write_stream(@_); }, 15 len => 2**17, 16 }, 17 len => 131072, 18 md5 => "31e5ad3d0d2aeb1ad8aaa847dfa665c2", 19); 20