#!/usr/bin/perl
use strict;
use warnings;
my $outname = "/usr/anil/scripts/myhtml.html";
open HTML, '>', $outname or die "Couldn't create '$outname': $!";
print HTML "\n";
print HTML "
\n";
print HTML "My Home Page";
print HTML "\n";
print HTML "\n";
print HTML "Here we have an HTML page with a paragraph.";
print HTML "\n";
print HTML "\n";
close (HTML);