httpd-apreq-cvs mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From j...@apache.org
Subject svn commit: r1072430 - /httpd/apreq/trunk/glue/perl/lib/APR/Request/Magic.pm
Date Sat, 19 Feb 2011 20:04:18 GMT
Author: joes
Date: Sat Feb 19 20:04:18 2011
New Revision: 1072430

URL: http://svn.apache.org/viewvc?rev=1072430&view=rev
Log:
docs

Modified:
    httpd/apreq/trunk/glue/perl/lib/APR/Request/Magic.pm

Modified: httpd/apreq/trunk/glue/perl/lib/APR/Request/Magic.pm
URL: http://svn.apache.org/viewvc/httpd/apreq/trunk/glue/perl/lib/APR/Request/Magic.pm?rev=1072430&r1=1072429&r2=1072430&view=diff
==============================================================================
--- httpd/apreq/trunk/glue/perl/lib/APR/Request/Magic.pm (original)
+++ httpd/apreq/trunk/glue/perl/lib/APR/Request/Magic.pm Sat Feb 19 20:04:18 2011
@@ -4,27 +4,94 @@ our $VERSION = "2.14";
 my $ctx;
 eval { local $ENV{PERL_DL_NONLAZY} = 1; require APR::Request::Apache2; };
 if ($@) {
-    require APR::Request::CGI;
-    base->import("APR::Pool");
+    require APR::Pool;
+    base->import("APR::Request::CGI");
     *handle = sub { $ctx ||= bless APR::Pool->new; APR::Request::CGI->handle($ctx,
@_) };
     our $MODE = "CGI";
 }
 else {
     require Apache2::RequestUtil;
-    base->import("Apache2::RequestRec");
+    base->import("APR::Request::Apache2");
     *handle = sub { APR::Request::Apache2->handle(Apache2::RequestUtil->request, @_)
};
     our $MODE = "Apache2";
 }
 
 1;
 
-# Notes:
-#
-# 1) the way to use this module is trivial:
-#
-#    use APR::Request::Magic;
-#
-#    my $apreq = APR::Request::Magic->handle(@typical_args_sans_the_first_one);
-#    # do stuff with $apreq which is an APR::Request object
-#
-# 2) Be sure PerlOptions +GlobalRequest is set for mp2.
+__END__
+
+=head1 NAME
+
+APR::Request::Magic - Portable API for working with CGI and modperl scripting
+
+
+
+
+=head1 SYNOPSIS
+
+    # Be sure PerlOptions +GlobalRequest is set for mp2.
+
+    use APR::Request::Magic;
+    $apreq = APR::Request::Magic->handle;
+    @foo   = $apreq->body("foo");
+    $bar   = $apreq->args("bar");
+    $c     = $apreq->jar("cookiename");
+
+
+
+
+=head1 DESCRIPTION
+
+The APR::Request::Magic module provides a cgi/mod_perl portable interface
+to libapreq2.  It is a subclass of APR::Request so all of its methods are
+available.
+
+
+
+
+=head1 APR::Request::Magic
+
+
+
+
+=head2 handle
+
+    APR::Request::Magic->handle(%args)
+
+Creates a new APR::Request::Magic object.  %args are the same options as for
+both APR::Request::CGI and APR::Request::Apache2, but not that the first argument
+(either $p or $r respectively) does not appear here.
+
+
+
+
+=head2 $MODE
+
+Global variable set to the operation mode of this module: either "CGI" or "Apache2".
+
+
+
+
+=head1 SEE ALSO
+
+L<APR::Request>, L<APR::Request::CGI>, L<APR::Request::Apache2>.
+
+
+
+
+=head1 COPYRIGHT
+
+  Licensed to the Apache Software Foundation (ASF) under one or more
+  contributor license agreements.  See the NOTICE file distributed with
+  this work for additional information regarding copyright ownership.
+  The ASF licenses this file to You under the Apache License, Version 2.0
+  (the "License"); you may not use this file except in compliance with
+  the License.  You may obtain a copy of the License at
+
+      http://www.apache.org/licenses/LICENSE-2.0
+
+  Unless required by applicable law or agreed to in writing, software
+  distributed under the License is distributed on an "AS IS" BASIS,
+  WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+  See the License for the specific language governing permissions and
+  limitations under the License.



Mime
View raw message