#!/usr/local/bin/perl print "Content-type: text/html \n\n"; #the extra newline provides a required blank line between header and text print "\n"; print "