如何动态构建 LWP::UserAgent 表单参数？答案

【问题标题】：How to build LWP::UserAgent form parameters dynamically?如何动态构建 LWP::UserAgent 表单参数？
【发布时间】：2011-06-03 11:13:34
【问题描述】：

我想动态构建一组用于 HTTP POST 的表单参数，但我不确定如何访问/构建 LWP::UserAgent 动态使用的数据结构。

典型的示例代码具有这种结构作为请求传递。

my $response = $browser->post(
  'http://example.com/postme',
  [
    'param1'  => 'value1',
    'param2' => 'value2'
  ],
);

我有一组存储在哈希中的参数名称和值，我想从我的哈希数据中构建方括号中的结构。那是什么结构，我怎样才能做我想做的事？（如您所知，我不是 perl 专家！）

【问题讨论】：

【解决方案1】：

方括号构造一个arrayref，但在这种情况下post 方法接受arrayref 或hashref。所以你可以这样做：

my %params;
$params{param1} = 'value1'; # store parameters into %params here
my $response = $browser->post('http://example.com/postme', \%params);

阅读perlreftut 了解参考资料简介，阅读perlref 了解更多详情。

【讨论】：