sbekman 00/11/25 07:39:25
Modified: . Changes mod_perl.pod
Apache Apache.pm
Log:
Documenting the new PerlAddVar httpd.conf directive. Please verify that I
didn't do any mistakes since I've added this from my notes made about 6
months ago. Thanks.
Revision Changes Path
1.549 +3 -0 modperl/Changes
Index: Changes
===================================================================
RCS file: /home/cvs/modperl/Changes,v
retrieving revision 1.548
retrieving revision 1.549
diff -u -r1.548 -r1.549
--- Changes 2000/11/07 23:09:19 1.548
+++ Changes 2000/11/25 15:39:21 1.549
@@ -10,6 +10,9 @@
=item 1.24_02-dev
+Documenting the new PerlAddVar httpd.conf directive
+[Stas Bekman <[EMAIL PROTECTED]>]
+
new Apache::test::static_modules() method
[Ken Williams <[EMAIL PROTECTED]>]
1.21 +28 -5 modperl/mod_perl.pod
Index: mod_perl.pod
===================================================================
RCS file: /home/cvs/modperl/mod_perl.pod,v
retrieving revision 1.20
retrieving revision 1.21
diff -u -r1.20 -r1.21
--- mod_perl.pod 2000/03/05 23:46:30 1.20
+++ mod_perl.pod 2000/11/25 15:39:22 1.21
@@ -167,15 +167,38 @@
=item CONFIGURATION
-The C<PerlSetVar> directive provides a simple mechanism for passing
-information from configuration files to Perl modules or Registry scripts:
+The C<PerlSetVar> and C<PerlAddVar> directives provide a simple
+mechanism for passing information from configuration files to Perl
+modules or Registry scripts.
+The C<PerlSetVar> directive allows you to set a key/value pair.
+
PerlSetVar SomeKey SomeValue
Perl modules or scripts retrieve configuration values using the
-C<$r-E<gt>dir_config> method (see 'perldoc Apache').
+C<$r-E<gt>dir_config> method.
+
+ $SomeValue = $r->dir_config('SomeKey');
+
+The C<PerlAddVar> directive allows you to emulate Perl arrays:
+
+ PerlAddVar SomeKey FirstValue
+ PerlAddVar SomeKey SecondValue
+ ... ... ...
+ PerlAddVar SomeKey Nth-Value
+
+In the Perl modules the values are extracted using the
+C<$r-E<gt>dir_config-E<gt>get> method.
+
+ @array = $r->dir_config->get('SomeKey');
+
+Alternatively in your code you can extend the setting with:
+
+ $r->dir_config->add(SomeKey => 'Bar');
+
+C<PerlSetVar> and C<PerlAddVar> handle keys case-insensitively.
+
-C<PerlSetVar> handles keys case-insensitively.
=item GATEWAY_INTERFACE
@@ -790,7 +813,7 @@
=head1 REVISION
-$Id: mod_perl.pod,v 1.20 2000/03/05 23:46:30 dougm Exp $
+$Id: mod_perl.pod,v 1.21 2000/11/25 15:39:22 sbekman Exp $
=head1 AUTHOR
1.59 +23 -0 modperl/Apache/Apache.pm
Index: Apache.pm
===================================================================
RCS file: /home/cvs/modperl/Apache/Apache.pm,v
retrieving revision 1.58
retrieving revision 1.59
diff -u -r1.58 -r1.59
--- Apache.pm 2000/11/07 23:09:25 1.58
+++ Apache.pm 2000/11/25 15:39:24 1.59
@@ -589,6 +589,29 @@
I<Apache::Table> class when called in a scalar context with no
"key" argument. See I<Apache::Table>.
+
+=item $r->dir_config->get( $key )
+
+Returns the value of a per-directory array variable specified by the
+C<PerlAddVar> directive.
+
+ # <Location /foo/bar>
+ # PerlAddVar Key Value1
+ # PerlAddVar Key Value2
+ # </Location>
+
+ my @val = $r->dir_config->get('Key');
+
+Alternatively in your code you can extend the setting with:
+
+ $r->dir_config->add(Key => 'Value3');
+
+Keys are case-insensitive.
+
+Will return a I<HASH> reference blessed into the
+I<Apache::Table> class when called in a scalar context with no
+"key" argument. See I<Apache::Table>.
+
=item $r->requires
Returns an array reference of hash references, containing information