#!/usr/bin/perl
print "Content-type: text/html\n\n";
print "";
print "";
print "";
print "";
print "<![CDATA[";
print "<BODY BGCOLOR=\"white\">";
print "<META HTTP-EQUIV=\"-REFRESH\" CONTENT=\"1;URL=./show.pl\">";
print "</BODY>";
print "</HTML>";]]>