#!/usr/bin/perl$CRLF = "\x0d\x0a"; print"Content-Type: text/html$CRLF$CRLF"; print"<H1>Hello, World!</H1>\n";