Perl / LWP 提交 javascript 表单的麻烦答案

【问题标题】：Perl / LWP Trouble to submit a javascript formPerl / LWP 提交 javascript 表单的麻烦
【发布时间】：2015-01-27 10:36:11
【问题描述】：

我正在尝试使用 perl（LWP 库）制作一个机器人来自动化一些烦人的任务。

我能够通过第一个登录页面，但我被重定向到第二个登录页面，并使用 Javascript 编写的公式：

<script language='javascript'>
var f;
f=(document.forms.length>0 ? document.forms.item(0) : null);
if (!f) {
    document.writeln("<form method='post' action='' target=''>");
    document.writeln("</form>");
    f=document.forms.item(0);
    }
f.action='URL';
f.target='_top';
f.submit();
</script>

由于这种方法，我的 ( HTML::Form->parse( $resultat->content, $resultat->base ) )[0] 找不到表单并崩溃。

我真的需要这方面的帮助，

谢谢:)

【问题讨论】：

标签： javascript forms perl lwp

【解决方案1】：

传统上，这个问题是通过 POST 到 js 应该创建的表单来解决的，这当然会在动态创建的表单发生任何变化时中断。

但同时存在

WWW::Scripter http://search.cpan.org/~lxp/WWW-Scripter-0.030/lib/WWW/Scripter.pod 和

WWW:Scripter::Plugin::Javascript http://search.cpan.org/~sprout/WWW-Scripter-Plugin-JavaScript-0.008a/lib/WWW/Scripter/Plugin/JavaScript.pm

我还没有尝试过。

也看看这个讨论： http://www.perlmonks.org/?node_id=983385

【讨论】：