timeout.cgi 336 B

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