loncom/build/system_dependencies/perltest.pl - diff

Return to perltest.pl CVS log

Up to [LON-CAPA] / loncom / build / system_dependencies

version 1.6, 2002/08/14 16:52:41	version 1.8, 2002/09/08 15:53:26
Line 32 This script is invoked by test-related t	Line 32 This script is invoked by test-related t
F<loncapa/loncom/build/Makefile>.	F<loncapa/loncom/build/Makefile>.

This script is also used as a CGI script and is installed	This script is also used as a CGI script and is installed
at the file location of F</home/httpd/html/lon-status/perltest.pl>.	at the file location of F</home/httpd/cgi-bin/perltest.pl>.

MODE, when left blank, the output defaults to 'statusreport' mode.	MODE, when left blank, the output defaults to 'statusreport' mode.
Except however, if $ENV{'QUERY_STRING'} exists, in which case	Except however, if $ENV{'QUERY_STRING'} exists, in which case
Line 187 if ($mode eq "html") {	Line 187 if ($mode eq "html") {
print(<<END);	print(<<END);
Content-type: text/html	Content-type: text/html

	<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
	"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html>	<html>
<head>	<head>
	<meta http-equiv="Content-Type" content="text/html; charset=utf-8"></meta>
<title>CPAN perl status report; $hostname; $date</title>	<title>CPAN perl status report; $hostname; $date</title>
</head>	</head>
<body bgcolor="#ffffff">	<body bgcolor="white">
<h1>CPAN perl status report</h1>	<h1>CPAN perl status report</h1>
<pre>	<pre>
END	END