Perl 如何获取原始post数据并使用Apache2:：Request访问参数？

请求似乎没有提供获取原始post数据的方法；有没有我错过的

---

或者，是否有一种方法可以单独读取post数据（在内容处理程序中-在此之前，post数据不应出现任何问题）并使用它初始化Apache2:：Request？

来自mod_perl cookbook:

my $r = shift;

my $content;
$r->read($content,$r->header_in('Content-length'));

my @pairs = split(/[&;]/,$content);

foreach my $pair (@pairs) {
    my ($parameter,$value) = split('=',$pair,2);
}

---

$r->read（$postdata，$r->headers\u in（'content\u length'）$r->args（$postdata）？这不允许使用Apache2:：Request查看参数。