Ok, this seems to work, but perldoc Apache doesn't say anything about
setting it. Is this at risk of not working in the future?
if ( $RUNNING_MOD_PERL && (my $query = Apache->request->args() ) ) {
for ( $query ) {
tr/&/&/s; # no muliple &
s/^&//; # no leading &
}
Apache->request->args( $query );
}
$r->args
The $r->args method will return the contents of the URI
query string. When called in a scalar context, the
entire string is returned. When called in a list
context, a list of parsed key => value pairs are
returned, i.e. it can be used like this:
$query = $r->args;
%in = $r->args;
Bill Moseley
mailto:[EMAIL PROTECTED]
