From 37722eca39874bb6abdcd120e3e458bd62dea62b Mon Sep 17 00:00:00 2001 From: Dylan William Hardison Date: Wed, 5 Jul 2017 11:43:18 -0700 Subject: Bug 1377933 - Remove trailing whitespace from all perl files --- testserver.pl | 20 ++++++++++---------- 1 file changed, 10 insertions(+), 10 deletions(-) (limited to 'testserver.pl') diff --git a/testserver.pl b/testserver.pl index f5cdae451..8f61b8cf2 100755 --- a/testserver.pl +++ b/testserver.pl @@ -62,7 +62,7 @@ else { # Check $webservergroup against the server's GID if ($sgid > 0) { if ($webservergroup eq "") { - print + print "WARNING \$webservergroup is set to an empty string. That is a very insecure practice. Please refer to the Bugzilla documentation.\n"; @@ -71,10 +71,10 @@ Bugzilla documentation.\n"; print "TEST-OK Webserver is running under group id in \$webservergroup.\n"; } else { - print + print "TEST-WARNING Webserver is running under group id not matching \$webservergroup. This if the tests below fail, this is probably the problem. -Please refer to the web server configuration section of the Bugzilla guide. +Please refer to the web server configuration section of the Bugzilla guide. If you are using virtual hosts or suexec, this warning may not apply.\n"; } } @@ -91,7 +91,7 @@ my $url = $ARGV[0] . "/images/padlock.png"; if (fetch($url)) { print "TEST-OK Got padlock picture.\n"; } else { - print + print "TEST-FAILED Fetch of images/padlock.png failed Your web server could not fetch $url. Check your web server configuration and try again.\n"; @@ -103,12 +103,12 @@ my $response = fetch($ARGV[0] . "/testagent.cgi"); if ($response =~ /^OK (.*)$/) { print "TEST-OK Webserver is executing CGIs via $1.\n"; } elsif ($response =~ /^#!/) { - print + print "TEST-FAILED Webserver is fetching rather than executing CGI files. Check the AddHandler statement in your httpd.conf file.\n"; exit(1); } else { - print "TEST-FAILED Webserver is not executing CGI files.\n"; + print "TEST-FAILED Webserver is not executing CGI files.\n"; } # Make sure that the web server is honoring .htaccess files @@ -117,7 +117,7 @@ $localconfig =~ s~^\./~~; $url = $ARGV[0] . "/$localconfig"; $response = fetch($url); if ($response) { - print + print "TEST-FAILED Webserver is permitting fetch of $url. This is a serious security problem. Check your web server configuration.\n"; @@ -142,12 +142,12 @@ if ($@ eq '') { } else { my $gd = $GD::VERSION; - + my $verstring = "GD version $gd, libgd version $gdlib"; - + $gdlib =~ s/^([^\.]+)\..*/$1/; $gd =~ s/^([^\.]+)\..*/$1/; - + if ($gdlib == $gd) { print "TEST-OK $verstring; Major versions match.\n"; } else { -- cgit v1.2.3-24-g4f1b