ceph/src/civetweb/test/timeout.cgi

   1 #!/usr/bin/env perl
   2
   3 # Make stdout unbuffered
   4 use FileHandle;
   5 STDOUT->autoflush(1);
   6
   7 # This script outputs some content, then sleeps for 5 seconds, then exits.
   8 # Web server should return the content immediately after it is sent,
   9 # not waiting until the script exits.
  10 print "Content-Type: text/html\r\n\r\n";
  11 print "Some data";
  12 sleep 3;