#! /usr/local/bin/perl print "Content-type: text/html\n\n"; print "\n"; print "\n"; print "Sample HTML document\n"; print "\n"; print "\n"; exit (0);