如何使用Perl填写web表单？

我想用Perl填写一个web表单。我很难找到正确的语法来完成这项任务。如中所示，如何转到URL，选择表单，填写表单，然后按enter键以确保它已提交？

类似于？

使用

Net:：HTTP

或其他什么（无法调用确切的模块）请求表单的操作URL，并将表单字段作为

GET

POST

参数包含在内（无论表单需要什么）。

和它的朋友们是最好的选择。中有几个例子，但通过谷歌搜索模块名称，你也会发现更多的例子

祝你好运，：）

也很管用

本模块的大纲是一个很好的例子：

 use HTML::Form;
 $form = HTML::Form->parse($html, $base_uri);
 $form->value(query => "Perl");

 use LWP::UserAgent;
 $ua = LWP::UserAgent->new;
 $response = $ua->request($form->click);

---

从WWW:：Mechanize:：Shell开始：

perl -MWWW::Mechanize::Shell -e shell
get http://some/page
fillout
...
submit

---

然后，键入“script”，并将生成的代码另存为something.pl——仅此而已。完成了。

是否有任何东西可以给我一个包含所有表单字段的数组？我正在查看WWW:：Mechanize表单和字段方法，但没有看到任何内容。选择表单的内容返回一个HTML:：form对象。这就是您用来检查表单的内容。我要查找的数组将来自

@inputs=$form->inputs

。谢谢