httpd-cvs mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From jor...@apache.org
Subject svn commit: r591306 - in /httpd/test/trunk/perl-framework/t/htdocs/modules/cgi: ./ action.pl.PL
Date Fri, 02 Nov 2007 11:31:13 GMT
Author: jorton
Date: Fri Nov  2 04:31:13 2007
New Revision: 591306

URL: http://svn.apache.org/viewvc?rev=591306&view=rev
Log:
- add CGI script for PR 43738 test case, missed in previous commit

Added:
    httpd/test/trunk/perl-framework/t/htdocs/modules/cgi/action.pl.PL
Modified:
    httpd/test/trunk/perl-framework/t/htdocs/modules/cgi/   (props changed)

Propchange: httpd/test/trunk/perl-framework/t/htdocs/modules/cgi/
------------------------------------------------------------------------------
--- svn:ignore (original)
+++ svn:ignore Fri Nov  2 04:31:13 2007
@@ -15,3 +15,4 @@
 nph-102.pl
 empty.pl
 pr37166.pl
+action.pl

Added: httpd/test/trunk/perl-framework/t/htdocs/modules/cgi/action.pl.PL
URL: http://svn.apache.org/viewvc/httpd/test/trunk/perl-framework/t/htdocs/modules/cgi/action.pl.PL?rev=591306&view=auto
==============================================================================
--- httpd/test/trunk/perl-framework/t/htdocs/modules/cgi/action.pl.PL (added)
+++ httpd/test/trunk/perl-framework/t/htdocs/modules/cgi/action.pl.PL Fri Nov  2 04:31:13
2007
@@ -0,0 +1,10 @@
+use strict;
+
+print "Content-type: text/plain\n\n";
+
+print $ENV{PATH_INFO} . "\n";
+
+if (my $ct = $ENV{CONTENT_LENGTH}) {
+    read STDIN, my $buffer, $ct;
+    print $buffer;
+}



Mime
View raw message