#!/usr/bin/perl -w

use CGI ":standard";

print header;

@output = (localtime);

print start_html ("Current Server Time");
print "<p>The time here now is $output[2]:$output[1]:$output[0]</p>";