BEGIN {
  $| = 1;
  open(STDERR, ">&STDOUT");
  print "Content-type: text/html\n\n";
}