#!usr/bin/perl -w
use strict;
use vars qw($out);
$out = "test060718.htm";
open( OUTPUT, ">", "$out") or die "Can't open $out \n";
# Send content-type -- NOT needed if sending to a file
# print "content-type: text/html \n\n";
# OUTPUT Header Section #
print OUTPUT "\n";
print OUTPUT "\n";
print OUTPUT "Created By Perl\n";
#\title fixed to /title as per [explorer] 's node, below
print OUTPUT "\n";
# HTML Body #
print OUTPUT "\n";
print OUTPUT "foo\nbar
\n\n";
####
Created By Perl
foo
bar