diff options
Diffstat (limited to 'rubbos/app/httpd-2.0.64/docs/cgi-examples')
-rw-r--r-- | rubbos/app/httpd-2.0.64/docs/cgi-examples/printenv | 13 | ||||
-rw-r--r-- | rubbos/app/httpd-2.0.64/docs/cgi-examples/test-cgi | 31 |
2 files changed, 44 insertions, 0 deletions
diff --git a/rubbos/app/httpd-2.0.64/docs/cgi-examples/printenv b/rubbos/app/httpd-2.0.64/docs/cgi-examples/printenv new file mode 100644 index 00000000..e4c2140b --- /dev/null +++ b/rubbos/app/httpd-2.0.64/docs/cgi-examples/printenv @@ -0,0 +1,13 @@ +#!/usr/local/bin/perl +## +## printenv -- demo CGI program which just prints its environment +## + +print "Content-type: text/plain; charset=iso-8859-1\n\n"; +foreach $var (sort(keys(%ENV))) { + $val = $ENV{$var}; + $val =~ s|\n|\\n|g; + $val =~ s|"|\\"|g; + print "${var}=\"${val}\"\n"; +} + diff --git a/rubbos/app/httpd-2.0.64/docs/cgi-examples/test-cgi b/rubbos/app/httpd-2.0.64/docs/cgi-examples/test-cgi new file mode 100644 index 00000000..e27f8575 --- /dev/null +++ b/rubbos/app/httpd-2.0.64/docs/cgi-examples/test-cgi @@ -0,0 +1,31 @@ +#!/bin/sh + +# disable filename globbing +set -f + +echo "Content-type: text/plain; charset=iso-8859-1" +echo + +echo CGI/1.0 test script report: +echo + +echo argc is $#. argv is "$*". +echo + +echo SERVER_SOFTWARE = $SERVER_SOFTWARE +echo SERVER_NAME = $SERVER_NAME +echo GATEWAY_INTERFACE = $GATEWAY_INTERFACE +echo SERVER_PROTOCOL = $SERVER_PROTOCOL +echo SERVER_PORT = $SERVER_PORT +echo REQUEST_METHOD = $REQUEST_METHOD +echo HTTP_ACCEPT = "$HTTP_ACCEPT" +echo PATH_INFO = "$PATH_INFO" +echo PATH_TRANSLATED = "$PATH_TRANSLATED" +echo SCRIPT_NAME = "$SCRIPT_NAME" +echo QUERY_STRING = "$QUERY_STRING" +echo REMOTE_HOST = $REMOTE_HOST +echo REMOTE_ADDR = $REMOTE_ADDR +echo REMOTE_USER = $REMOTE_USER +echo AUTH_TYPE = $AUTH_TYPE +echo CONTENT_TYPE = $CONTENT_TYPE +echo CONTENT_LENGTH = $CONTENT_LENGTH |