1# test persistent http 1.1 connection and grep for content length
2
3use strict;
4use warnings;
5
6my @lengths = (1, 2, 0, 3, 4);
7our %args = (
8    client => {
9	func => \&http_client,
10	lengths => \@lengths,
11    },
12    relayd => {
13	protocol => [ "http",
14	    "match request header log foo",
15	    "match response header log Content-Length",
16	],
17	loggrep => [ map { "Content-Length: $_" } @lengths ],
18    },
19    server => {
20	func => \&http_server,
21    },
22    lengths => \@lengths,
23    md5 => [
24	"68b329da9893e34099c7d8ad5cb9c940",
25	"897316929176464ebc9ad085f31e7284",
26	"d41d8cd98f00b204e9800998ecf8427e",
27	"0ade138937c4b9cb36a28e2edb6485fc",
28	"e686f5db1f8610b65f98f3718e1a5b72",
29	"68b329da9893e34099c7d8ad5cb9c940",
30	"897316929176464ebc9ad085f31e7284",
31	"d41d8cd98f00b204e9800998ecf8427e",
32	"0ade138937c4b9cb36a28e2edb6485fc",
33	"e686f5db1f8610b65f98f3718e1a5b72",
34    ],
35);
36
371;
38