#!/usr/bin/perl -w 
use strict;
use CGI qw/:all/;

open FOUT,"> my_html_page.html" or die $!;
print FOUT start_html,p("Hello world"),end_html;