Question

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

我能够通过第一个登录页面，但我被重定向到第二个用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-＆gt; parse（$ resultat-＆gt; content，$ resultat-＆gt; base））[0]，找不到表格＆amp;崩溃。

我真的需要帮助，

谢谢：）

Answer 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

Perl / LWP麻烦提交一个javascript表单

1 个答案: