#!/usr/bin/perl -w use strict; use CGI qw(:cgi-lib :standard); ########################################################################### print "Content-type: text/html \n\n"; print < HTMLCODE exit(0);