timeout.cgi 306 B

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