args-http-remove.pl revision 1.1
1use strict; 2use warnings; 3 4my %header = ( 5 "X-Header-Foo" => "foo", 6 "X-Header-Bar" => "bar", 7); 8our %args = ( 9 client => { 10 func => \&http_client, 11 loggrep => { 12 "X-Header-Foo: foo" => 0, 13 "X-Header-Bar: bar" => 1, 14 }, 15 }, 16 relayd => { 17 protocol => [ "http", 18 'response header remove X-Header-Foo log', 19 ], 20 loggrep => { qr/done, \[X-Header-Foo: foo\s*\]/ => 1 }, 21 }, 22 server => { 23 func => \&http_server, 24 header => \%header, 25 loggrep => { 26 "X-Header-Foo: foo" => 1, 27 "X-Header-Bar: bar" => 1, 28 }, 29 }, 30); 31 321; 33