#!/usr/bin/perl -wT
use strict;
# use diagnostics;
print "Content-Type: text/html\n\n";
print "<html><head><title>Hello, World! Script</title></head>\n";
print "<body>\n";
print "<p>Hello, World!</p>\n";
print "</body></html>\n";