Perl:如何打印 WWW::Curl::Form 内容？

Question

我有一个 my $curlf = WWW::Curl::Form->new; 变量，我想检查它的内容。

我试着做一个
print Dumper($curlf) if($verbose);
但得到以下结果:
$VAR1 = bless( do{\(my $o = 151334456)}, 'WWW::Curl::Form' );
正确的方法是什么？

提前致谢。

Answer 1

WWW::Curl::Form不是一个适当的 Perl 数据结构，它只是对隐藏在 XS 代码中的 C 数据结构的标量引用，它本身(至少部分)是一些 libcurl 的包装器。库函数。

如果你可以用 C 编程，检查其内容的正确方法是使用正确的 libcurl 扩展 XS 代码。从一对curl_httppost中提取信息的函数调用数据结构。然后将补丁发送给模块的维护者。

如果你不能用 C 编程，那么就向模块维护者发送一个功能请求以获取模块的下一个版本。