diff options
Diffstat (limited to 'tests/docroot')
| -rwxr-xr-x | tests/docroot/www/404.fcgi | 27 | ||||
| -rw-r--r-- | tests/docroot/www/Makefile.am | 1 |
2 files changed, 0 insertions, 28 deletions
diff --git a/tests/docroot/www/404.fcgi b/tests/docroot/www/404.fcgi deleted file mode 100755 index b6459bc3..00000000 --- a/tests/docroot/www/404.fcgi +++ /dev/null @@ -1,27 +0,0 @@ -#!/usr/bin/env perl - -use CGI::Fast qw(:standard); - -while (new CGI::Fast) { - my $request_uri = $ENV{'REQUEST_URI'}; - print (STDERR "REQUEST_URI: $request_uri\n"); - if ($request_uri =~ m/^\/dynamic\/200\// ) { - print header ( -status => 200, - -type => 'text/plain' ); - print ("found here\n"); - } - elsif ($request_uri =~ m|^/dynamic/302/| ) { - print header( -status=>302, - -location => 'http://www.example.org/'); - } - elsif ($request_uri =~ m/^\/dynamic\/404\// ) { - print header ( -status => 404 - -type => 'text/plain' ); - print ("Not found here\n"); - } - else { - print header ( -status => 500, - -type => 'text/plain'); - print ("huh\n"); - }; -}; diff --git a/tests/docroot/www/Makefile.am b/tests/docroot/www/Makefile.am index 3d49b60b..1e2f6aef 100644 --- a/tests/docroot/www/Makefile.am +++ b/tests/docroot/www/Makefile.am @@ -1,5 +1,4 @@ EXTRA_DIST=\ - 404.fcgi \ 404.html \ 404.pl \ cgi-pathinfo.pl \ |