A Perl Script for the Web

print "Content-type: text/html\n\n";

$now = localtime();

print "<html><body>";

print "<h2>The time is $now\n";

print " </h2></body></html>";

Previous slide Next slide Back to first slide View graphic version