#!c:/perl/bin/perl

use Time::gmtime; 
($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = gmtime();

print << "EOF";
Content-Type: Text/html\n\n
<b><font face=courier color=white size=2>$sec</font></b>
EOF