diff options
author | Marcus Rückert <darix@opensu.se> | 2007-08-12 21:04:14 +0000 |
---|---|---|
committer | Marcus Rückert <darix@opensu.se> | 2007-08-12 21:04:14 +0000 |
commit | 420abdb295dcd5b6531bce4ba9d9b9f3e6f5eacd (patch) | |
tree | 57d12ab8bd44051b35d389c887244d3e45fca28d /tests/docroot | |
parent | 58ea3c14c548b1df77d3dc07245bf6e5d68da7b5 (diff) | |
download | lighttpd-git-420abdb295dcd5b6531bce4ba9d9b9f3e6f5eacd.tar.gz |
- added test cases for 404 handler
git-svn-id: svn://svn.lighttpd.net/lighttpd/branches/lighttpd-1.4.x@1894 152afb58-edef-0310-8abb-c4023f1b3aa9
Diffstat (limited to 'tests/docroot')
-rw-r--r-- | tests/docroot/www/404.html | 1 | ||||
-rw-r--r-- | tests/docroot/www/404.pl | 24 |
2 files changed, 25 insertions, 0 deletions
diff --git a/tests/docroot/www/404.html b/tests/docroot/www/404.html new file mode 100644 index 00000000..ce72e899 --- /dev/null +++ b/tests/docroot/www/404.html @@ -0,0 +1 @@ +static not found diff --git a/tests/docroot/www/404.pl b/tests/docroot/www/404.pl new file mode 100644 index 00000000..4260e32e --- /dev/null +++ b/tests/docroot/www/404.pl @@ -0,0 +1,24 @@ +#!/usr/bin/perl +use CGI qw/:standard/; +my $cgi = new CGI; +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/301/| ) { + 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 => 404, + -type => 'text/plain'); + print ("huh\n"); +}; |