1# test 50 http get with length 1 over http relay 2 3use strict; 4use warnings; 5 6my @lengths = map { 1 } (1..50); 7our %args = ( 8 client => { 9 func => \&http_client, 10 lengths => \@lengths, 11 method => "GET", 12 }, 13 relayd => { 14 protocol => [ "http" ], 15 loggrep => { 16 qr/, (?:done|last write \(done\)), GET/ => (1 + @lengths), 17 }, 18 }, 19 server => { 20 func => \&http_server, 21 }, 22 lengths => \@lengths, 23); 24 251; 26