$apr = Apache::Request->new($r, DISABLE_UPLOADS => 1);
my $args = $apache_request->param;

##</code><code>##

my %args = $r->method eq 'GET' ? $r->args : $r->content;