summaryrefslogtreecommitdiff
path: root/regress/usr.sbin/relayd/args-http-change-cookie.pl
blob: c6808c9815954754f3c96d07a5e2378155322b8b (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
use strict;
use warnings;

my $name = "Set-Cookie";
my %header = ("$name" => [ "test=a;", "test=b;" ]);
our %args = (
    client => {
	func => \&http_client,
	loggrep => {
		qr/$name: test=c/ => 1,
	}
    },
    relayd => {
	protocol => [ "http",
	    'match response header set "'.$name.'" value "test=c"',
	],
    },
    server => {
	func => \&http_server,
	header => \%header,
	loggrep => {
		qr/$name: test=a/ => 1
	},
    },
);

1;