1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
# test out-of-band data with non-blocking relay use strict; use warnings; our %args = ( client => { func => \&write_oob, nocheck => 1, }, relay => { nonblocking => 1, nocheck => 1, }, server => { func => \&read_oob, }, len => 247, md5 => "f76df02a35322058b8c29002aaea944f", );