> -----Original Message-----
> From: Doug MacEachern [mailto:[EMAIL PROTECTED]]
> Sent: Friday, May 12, 2000 2:02 PM
> To: Michael Blakeley
> Cc: [EMAIL PROTECTED]
> Subject: Re: CGI::Delete for Apache::Request
>
>
> On Sat, 6 May 2000, Michael Blakeley wrote:
>
> > I've been migrating some code off of the ENV-dependent methods in
> > CGI.pm, so I can turn of PerlSetupEnv. Anyway, I couldn't find an
> > Apache::Request method that had the functionality of CGI::Delete.
> > Since I use Delete extensively, I coded a replacement based on the
> > param() prototype in Apache::Request. This may be useful to other
> > programmer porting CGI.pm code.
> >
> > # for compatibility with CGI::Delete - call with $apr->Delete("foo")
> > sub Delete {
> > my $self = shift;
> > my $tab = $self->parms;
> > for (@_) {
> > $tab->unset($_);
> > }
> > } # end sub Delete
> >
> > Trivial, once you know how. But maybe worth including in a
> future rev
> > of Apache::Request? Or at least documenting? I spent some time just
> > finding "unset".
>
> i would like to document the $self->parms table, and point to the
> Apache::Table docs.
>
> > It'd be even better if unset() would take a list argument,
> of course....
>
> that can be arranged :) i would prefer this, rather than adding the
> Delete method to Apache::Request.
>
just picking up some of the scut work, if it helps :)
--- Request.pm.old Mon May 15 10:55:47 2000
+++ Request.pm Mon May 15 11:22:07 2000
@@ -116,6 +116,14 @@
my @params = $apr->param;
$apr->param('foo' => [qw(one two three)]);
+=item parms
+
+Returns a hash reference tied to the I<Apache::Table> class.
+Provides an alternative interface to the same fields as param().
+
+ my $table = $apr->parms;
+ my $value = $table->get('foo');
+
=item upload
Returns a single I<Apache::Upload> object in a scalar context or
--Geoff
