print "Content-Type: text/plain;\n\n";
#------------------------------------------------------------------

# Current time as 'YYYYMMDD.HHMMSS' (GMT)
($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst)=gmtime(time);
$revision = sprintf("%04d%02d%02d.%02d%02d%02d",
                    $year+1900,$mon+1,$mday,$hour,$min,$sec);

#------------------------------------------------------------------
print "\n\nRevision: $revision\n\n";