1# match and set header with tags 2 3use strict; 4use warnings; 5 6my %header_client = ( 7 "User-Agent" => "Mozilla Bla", 8 "MyHeader" => "UnmatchableContent", 9); 10 11our %args = ( 12 client => { 13 func => \&http_client, 14 header => \%header_client, 15 len => 33, 16 }, 17 relayd => { 18 protocol => [ "http", 19 # setting the User-Agent should succeed 20 'match request header "User-Agent" value "Mozilla*" tag BORK', 21 'match request header set "User-Agent" value "BORK" tagged BORK', 22 'match request header log "User-Agent"', 23 # setting MyHeader should not happen 24 'match request header "MyHeader" value "SomethingDifferent" tag FOO', 25 'match request header set "MyHeader" value "FOO" tagged FOO', 26 'match request header log "MyHeader"', 27 ], 28 loggrep => { 29 'User-Agent: BORK' => 1, 30 'MyHeader: FOO' => 0, 31 }, 32 }, 33 server => { 34 func => \&http_server, 35 loggrep => { 36 "User-Agent: BORK" => 1, 37 "MyHeader: FOO" => 0, 38 } 39 }, 40 len => 33, 41); 42 431; 44