perl - 梅森：请求有效载荷

Question

Mason我需要使用基于 - 的 Perl 脚本接收来自“请求有效负载”标头的数据。

我试过$r->body(), $r->upload(),$m->content()方法，但它们返回空字符串。

请求中的数据存在，我已经用 Chrome 开发工具检查了它。

Answer 1

解决方案：

my $raw_body;
$r->read($raw_body, $r->headers_in->{'Content-length'});