Return to 404.pl CVS log

Up to [ELWIX - Embedded LightWeight unIX -] / embedaddon / lighttpd / tests / docroot / www

Annotation of embedaddon/lighttpd/tests/docroot/www/404.pl, revision 1.1.1.2

1.1.1.2 ! misho       1: #!/usr/bin/env perl
        !             2: 
1.1       misho       3: my $request_uri = $ENV{'REQUEST_URI'};
                      4: 
                      5: if ($request_uri =~ m/^\/dynamic\/200\// ) {
1.1.1.2 ! misho       6:   print "Status: 200\n",
        !             7:         "Content-Type: text/plain\n",
        !             8:         "\n",
        !             9:         "found here\n";
1.1       misho      10: }
                     11: elsif ($request_uri =~ m|^/dynamic/302/| ) {
1.1.1.2 ! misho      12:   print "Status: 302\n",
        !            13:         "Location: http://www.example.org/\n",
        !            14:         "\n";
1.1       misho      15: }
                     16: elsif ($request_uri =~ m/^\/dynamic\/404\// ) {
1.1.1.2 ! misho      17:   print "Status: 404\n",
        !            18:         "Content-Type: text/plain\n",
        !            19:         "\n",
        !            20:         "Not found here\n";
1.1       misho      21: }
                     22: elsif ($request_uri =~ m/^\/send404\.pl/ ) {
1.1.1.2 ! misho      23:   print "Status: 404\n",
        !            24:         "Content-Type: text/plain\n",
        !            25:         "\n",
        !            26:         "Not found here (send404)\n";
1.1       misho      27: }
                     28: elsif ($request_uri =~ m/^\/dynamic\/nostatus\// ) {
                     29:   print ("found here\n");
                     30: }
1.1.1.2 ! misho      31: elsif ($request_uri =~ m/^\/dynamic\/redirect_status\// ) {
        !            32:   print "Status: $ENV{'REDIRECT_STATUS'}\n",
        !            33:         "Content-Type: text/plain\n",
        !            34:         "\n",
        !            35:         "REDIRECT_STATUS\n";
        !            36: }
1.1       misho      37: else {
1.1.1.2 ! misho      38:   print "Status: 500\n",
        !            39:         "Content-Type: text/plain\n",
        !            40:         "\n",
        !            41:         "huh\n";
1.1       misho      42: };