1# test maximum data length then copy packets,
2# relay sleeps before processing
3
4use strict;
5use warnings;
6use List::Util qw(sum);
7
8my @lengths = (5, 4, 3, 2, 1, 0);
9
10our %args = (
11    client => {
12	lengths => \@lengths,
13    },
14    relay => {
15	func => sub { sleep 3; relay(@_); relay_copy(@_); },
16	max => 9,
17	big => 1,
18	timeout => 1,
19	nocheck => 1,
20    },
21    len => sum(@lengths),
22    lengths => "@lengths",
23    md5 => "464ddb107046ee0a42f43b202e826b8f",
24);
25