#!/usr/bin/perl print qq(Content-type: text/html\n\n); print qq(Whois\n); print qq(
\n);




print qq(
\n\n\n);
exit(0);

############