in reply to Raw HTML Code

Oddly, it works for me (I made two fairly trivial changes to the program you listed: I modified the message printed when the open dies and I put the argument for the open in parentheses.

Then generated code looks like this: 

<html>
<head>
<title>My Home Page</title></head>
<body bgcolor = blue>
 Here we have an HTML page with a paragraph. </body>
</html>

[download]

Just for completeness, this is the code I actually used: 

#!/usr/bin/perl
use strict;
use warnings;
use CGI qw/:standard/;
print "content-type: text/html \n\n"; #The header print header;
my  $outname = "myhtml.html";
open(HTML, '>', $outname)  or die "Couldn't create $outname because $!
+\n";
print HTML "<html>\n";
print HTML "<head>\n";
print HTML "<title>My Home Page</title>";
print HTML "</head>\n";
print HTML "<body bgcolor = blue>\n";
print HTML " Here we have an HTML page with a paragraph. ";
print HTML "</body>\n";
print HTML "</html>\n";
close (HTML);

[download]

Information about American English usage here and here. Floating point issues? Please read this before posting. — emc

In Section Seekers of Perl Wisdom