1# test immediate data transfer after maximum data length
2
3use strict;
4use warnings;
5
6our %args = (
7    client => {
8	func => sub { $| = 1; errignore(@_); write_stream(@_); sleep(6); },
9	nocheck => 1,
10    },
11    relay => {
12	func => sub { relay(@_); sleep(5); },
13	max => 63,
14	big => 1,
15    },
16    server => {
17	func => sub { alarm(4); read_stream(@_); },
18	max => 63,
19    },
20    len => 63,
21    md5 => "4a3c3783fc56943715c53e435973b2ee",
22);
23