#!/usr/local/bin/perl -w
#
# File:  helloWorld.pl

$date = `date`;  # Unix 'date' utility
$hostpath = "http://www.npac.syr.edu/projects/tutorials/CGI/examples/basic";

$out = qq{Content-type: text/html

<HTML>
<HEAD>
<TITLE>CGI Example: Hello World!</TITLE>
</HEAD>
<BODY BGCOLOR="#ffffff">

<H1>Hello World!</H1>

This program was run on $date

<P><HR><P>Return to
<A HREF="$hostpath/helloWorld0.html">HTML form</A>

</BODY>
</HTML>
};

print "$out";
