local STDOUT;
select((select(STDOUT), $|++)[0]);

##</code><code>##

print "HTTP/1.1 200 OK"