print "HTTP/1.1 200 OK"

##</code><code>##

print "Content-type: text/html\n\n";

##</code><code>##

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