#!/usr/foo/perl

print <<EOF;
Content-type: text/html

Foo!
EOF