diff options
| author | justdave%bugzilla.org <> | 2007-02-11 09:12:24 +0100 |
|---|---|---|
| committer | justdave%bugzilla.org <> | 2007-02-11 09:12:24 +0100 |
| commit | cbd72dff8696ab1ec64a6b0c31e982d2b3a8df3e (patch) | |
| tree | 39ad7b0cfa876624c297af718f7625047e06d922 /testserver.pl | |
| parent | 2f97f350c6548ea2cec674659f9034d146b99eb3 (diff) | |
| download | bugzilla-cbd72dff8696ab1ec64a6b0c31e982d2b3a8df3e.tar.gz bugzilla-cbd72dff8696ab1ec64a6b0c31e982d2b3a8df3e.tar.xz | |
Bug 369956: Have testserver.pl report whether or not the server is using mod_perl
r=mkanat, a=justdave
Diffstat (limited to 'testserver.pl')
| -rwxr-xr-x | testserver.pl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/testserver.pl b/testserver.pl index af4ba67e7..108a19ac2 100755 --- a/testserver.pl +++ b/testserver.pl @@ -107,8 +107,8 @@ Check your webserver configuration and try again.\n"; # Try to execute a cgi script my $response = fetch($ARGV[0] . "/testagent.cgi"); -if ($response =~ /^OK/) { - print "TEST-OK Webserver is executing CGIs.\n"; +if ($response =~ /^OK (.*)$/) { + print "TEST-OK Webserver is executing CGIs via $1.\n"; } elsif ($response =~ /^#!/) { print "TEST-FAILED Webserver is fetching rather than executing CGI files. |