Perhaps I'm missing something, but what's wrong with the plain old CGI module?

#!/usr/bin/perl -w
use strict;
use CGI::Carp qw/fatalsToBrowser warningsToBrowser/;
use CGI qw/:standard/;
$|++;

my $fontname = "italic 1em Arial, sans-serif";
open F, '>', "output.html" or die "output.html: $!\n";

print F start_html,
        div({ style => "font: $fontname;" }, "\n",
            pre("Hello, World!"), "\n",
            pre("CGI example, with font '$fontname'")
        ),
        end_html;
[download]

Update: Removed the call to 'header' from the print statement; it's unnecessary if you're writing to a file, of course.

Update2: Since I'd used literal text strings, I'd forgotten about converting various characters to HTML entities (thanks, Corion!) This is easily done either via HTML::Entities or possibly by processing the text through something like this:

my %s;
@s{split //, '<>&'} = qw/lt gt amp/;
my $text = do { local $/; <Input> };
$text =~ s/([<>&])/"&$s{$1};"/ges;
[download]