#!/usr/local/bin/perl
# Open HTML context

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

# Redirect outputs

open (STDERR, '>&STDOUT'); # Send error messages to user
$|=1; # Flush the in/out buffer immediately

# Start the HTML body
print "<html><body>\n";

# Everything you want

print "Hellow\n";

# Finish the HTML

print "</body></html>\n";

exit;
