Return-Path: Delivered-To: apmail-httpd-apreq-dev-archive@httpd.apache.org Received: (qmail 36802 invoked by uid 500); 12 Mar 2001 18:05:29 -0000 Mailing-List: contact apreq-dev-help@httpd.apache.org; run by ezmlm Precedence: bulk X-No-Archive: yes List-Post: List-Help: List-Unsubscribe: List-Subscribe: Delivered-To: mailing list apreq-dev@httpd.apache.org Received: (qmail 36787 invoked from network); 12 Mar 2001 18:05:27 -0000 Message-ID: From: Geoffrey Young To: 'Joe Schaefer' , apreq-dev@httpd.apache.org Subject: RE: [RFC] Patch (Was: Apache::Request patch request (fwd)) Date: Mon, 12 Mar 2001 13:06:59 -0500 MIME-Version: 1.0 X-Mailer: Internet Mail Service (5.5.2650.21) Content-Type: text/plain X-Spam-Rating: h31.sny.collab.net 1.6.2 0/1000/N Status: O X-Status: X-Keywords: X-UID: 11 Hi. compiles ok on linux with bleedperl... > 1) rewrites Apache::Request::param as an xsub, incorporating Jody's > above fix. I'm not sure I did it right, since I'm still not > comfortable with my understanding of XS. It seems to work under > light testing though. My reason for XS'ing param() was mainly to > eliminate any need for $r->parms. I tried to use param() like parms() with this simple program and I get the appropriate results, but Attempt to free unreferenced scalar at /usr/local/apache/perl-bin/request.pl line 5. #!/usr/bin/perl my $r = Apache::Request->new(shift); my $table = $r->param; $r->send_http_header('text/plain'); print $table->get('foo'); --Geoff >