1use strict; 2use warnings; 3 4our %args = ( 5 client => { 6 func => \&http_client, 7 path => "query?foobar", 8 }, 9 relayd => { 10 table => 1, 11 protocol => [ "http", 12 'match request path hash "/query"', 13 'match request path log "/query"', 14 ], 15 relay => 'forward to <table-$test> port $connectport', 16 loggrep => { 17 qr/ (?:done|last write \(done\)), \[\/query: foobar\]/ => 1, 18 }, 19 }, 20 server => { 21 func => \&http_server, 22 }, 23 len => 13, 24); 25 261; 27