New Page 1

##

#!c:/Perl/bin/Perl.exe
use CGI;
use CGI::Carp qw(fatalsToBrowser);
print "Content-type: text/shtml\n\n";
&printtest();
sub printtest{
   	print <





New Page 1







ENDHTML
}