#!/usr/local/bin/pike

int main(int argc, array(string) argv)
{
	int sock = Public.Web.FCGI.open_socket("127.0.0.1:31337", 128);
	object request = Public.Web.FCGI.FCGI(sock);

	for (;;) {
		string buf;
		request->accept();

		if (request->env["CONTENT_LENGTH"])
			request->read(request->env["CONTENT_LENGTH"]);	// must read any post data before starting filtering

		request->start_filter_data();
		request->write("I am a useless header added to this file!\n");

		for (buf = request->read(1024); !request->eof(); buf = request->read(1024)) {
			request->write(buf);
		}
	}
	return (0);
}