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