args-https-put.pl revision 1.3
1# test persistent https 1.1 put over http relay 2 3use strict; 4use warnings; 5 6my @lengths = (251, 16384, 0, 1, 2, 3, 4, 5); 7our %args = ( 8 client => { 9 func => \&http_client, 10 lengths => \@lengths, 11 method => "PUT", 12 ssl => 1, 13 mreqs => 1, 14 }, 15 relayd => { 16 protocol => [ "http", 17 "match request header log foo", 18 "match response header log bar", 19 ], 20 forwardssl => 1, 21 listenssl => 1, 22 loggrep => qr/\, done/, 23 }, 24 server => { 25 func => \&http_server, 26 ssl => 1, 27 mreqs => scalar(@lengths), 28 }, 29 lengths => \@lengths, 30 md5 => "bc3a3f39af35fe5b1687903da2b00c7f", 31); 32 331; 34