From: Jeff Trawick <trawick@apache.org>
Date: Thu, 28 Jan 2016 12:07:07 +0000 (+0000)
Subject: Update Perl FCGI examples to work with current version of module
X-Git-Tag: 2.5.0-alpha~2259
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=2f2a22bd7e1d8fae1aefc7c75b005960be633e53;p=thirdparty%2Fapache%2Fhttpd.git

Update Perl FCGI examples to work with current version of module


git-svn-id: https://svn.apache.org/repos/asf/httpd/httpd/trunk@1727317 13f79535-47bb-0310-9956-ffa450edef68
---

diff --git a/docs/manual/mod/mod_authnz_fcgi.xml b/docs/manual/mod/mod_authnz_fcgi.xml
index 48d0392b280..23a1ea84100 100644
--- a/docs/manual/mod/mod_authnz_fcgi.xml
+++ b/docs/manual/mod/mod_authnz_fcgi.xml
@@ -86,7 +86,8 @@ and Access Control</a></seealso>
 <highlight language="perl">
 #!/usr/bin/perl
 use FCGI;
-while (FCGI::accept >= 0) {
+my $request = FCGI::Request();
+while ($request->Accept() >= 0) {
     die if $ENV{'FCGI_APACHE_ROLE'} ne "AUTHENTICATOR";
     die if $ENV{'FCGI_ROLE'}        ne "AUTHORIZER";
     die if !$ENV{'REMOTE_PASSWD'};
@@ -131,7 +132,8 @@ AuthnzFcgiDefineProvider authn FooAuthn fcgi://localhost:10102/
 <highlight language="perl">
 #!/usr/bin/perl
 use FCGI;
-while (FCGI::accept >= 0) {
+my $request = FCGI::Request();
+while ($request->Accept() >= 0) {
     die if $ENV{'FCGI_APACHE_ROLE'} ne "AUTHORIZER";
     die if $ENV{'FCGI_ROLE'}        ne "AUTHORIZER";
     die if $ENV{'REMOTE_PASSWD'};
@@ -181,7 +183,8 @@ AuthnzFcgiDefineProvider authz FooAuthz fcgi://localhost:10103/
 <highlight language="perl">
 #!/usr/bin/perl
 use FCGI;
-while (FCGI::accept >= 0) {
+my $request = FCGI::Request();
+while ($request->Accept() >= 0) {
     die if $ENV{'FCGI_APACHE_ROLE'};
     die if $ENV{'FCGI_ROLE'} ne "AUTHORIZER";
     die if !$ENV{'REMOTE_PASSWD'};
@@ -228,7 +231,8 @@ AuthnzFcgiDefineProvider authnz FooAuthnz fcgi://localhost:10103/
 <highlight language="perl">
 #!/usr/bin/perl
 use FCGI;
-while (FCGI::accept >= 0) {
+my $request = FCGI::Request();
+while ($request->Accept() >= 0) {
     die if $ENV{'FCGI_APACHE_ROLE'} ne "AUTHENTICATOR";
     die if $ENV{'FCGI_ROLE'} ne "AUTHORIZER";