diff --git a/test/timeout.cgi b/test/timeout.cgi new file mode 100755 index 00000000..264d1cb0 --- /dev/null +++ b/test/timeout.cgi @@ -0,0 +1,16 @@ +#!/usr/bin/env perl + +use Cwd; +use CGI; + +use vars '%in'; +CGI::ReadParse(); + +print "Content-Type: text/html\r\n\r\n"; + +# This script outputs some content, then sleeps for 5 seconds, then exits. +# Web server should return the content immediately after it is sent, +# not waiting until the script exits. +print "Some data"; +flush STDOUT; +sleep 5;