#!/usr/bin/perl -w
my $title = "Simple Page Return Script";
##### Print header #####################################################
######print "\n\n";
print "Content-type: text/html\n\n";
print "
$title\n";
print "\n";
# print "\n";
print "Running $0 in Perl $]
\n";
print "\n";
for ( qw(
CGI
CGI::Application
Data::Dumper
HTML::Template
) )
{
print eval "require $_"
? "| $_ ok: |
\n"
: "| $_ failed: |
\n"
}
print "
\n";
##### Print footer #####################################################
print "
\n\n";
print "webmaster\@cantrall.net
\n";
### created Oct 07 2004 ###
print "Last revised on 12 Oct 2004 16:16
\n";
print "\n\n\n";
exit (0);