1# test 50 https put 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 => "PUT", 12 ssl => 1, 13 }, 14 relayd => { 15 protocol => [ "http" ], 16 loggrep => { 17 qr/, (?:done|last write \(done\)), PUT/ => (1 + @lengths), 18 }, 19 forwardssl => 1, 20 listenssl => 1, 21 }, 22 server => { 23 func => \&http_server, 24 ssl => 1, 25 }, 26 lengths => \@lengths, 27); 28 291; 30