Perl / LWP 提交 JavaScript 表单的麻烦

Perl / LWP Trouble to submit a javascript form

本文关键字:表单 麻烦 JavaScript 提交 LWP Perl      更新时间:2023-09-26

我正在尝试用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]找不到表单和崩溃。

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

谢谢:)

传统上,这个问题是通过 POST 到 js 应该创建的形式来解决的,当然,动态创建表单的任何更改都会中断。

然而,与此同时,存在

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

WWW:Scripter::P lugin::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