1use strict; 2use warnings; 3 4my @lengths = (21); 5our %args = ( 6 client => { 7 func => \&http_client, 8 lengths => \@lengths, 9 path => "query?foo=bar&ok=yes", 10 }, 11 relayd => { 12 protocol => [ "http", 13 'block request', 14 'block request query log "ok"', 15 'pass query log "foo" value "bar"', 16 ], 17 loggrep => { 18 qr/\[foo: bar\]/ => 2, 19 qr/\[ok: yes\]/ => 0, 20 }, 21 }, 22 server => { 23 func => \&http_server, 24 }, 25 lengths => \@lengths, 26); 27 281; 29