Created By Perl<\title>\n"; print OUTPUT "</head>\n"; # HTML Body # print OUTPUT "<body>\n";

open(OUTPUT, $outputFile); # Send content-type print "content-type: text/html \n\n"; # OUPTUT Header Section # print OUTPUT "\n"; print OUTPUT "\n"; print OUTPUT "Created By Perl<\title>\n"; print OUTPUT "</head>\n"; # HTML Body # print OUTPUT "<body>\n";