#!/usr/bin/perl5
##
## simple HTML Hello World
##
use strict;
my $that_famous_string = 'Hello, world!';
# send the obligatory Content-Type
print "Content-type: text/html\n\n";
# print the HTML
print ''."\n";
print "\n";
print "\n";
print "$that_famous_string\n";
print "\n";
print "\n";
print "$that_famous_string\n";
print "\n";
print "\n";