#!/usr/local/bin/perl

use CGI;
$query = new CGI;

print $query->header(-refresh=>1);
print $query->start_html("Tick Tock");
$time = `/bin/date`;
print "<CENTER><H3>$time<H3></CENTER>";
print $query->end_html;