Perl 提交到页面，然后再次提交

Question

我有以下代码:

$IEDocument = $IE->{Document};
$Forms = $IEDocument->all;
$form = $forms->item{'search');
$form->click;

# it clicks the search button which submits to a page
# then I do the following

$doc = $IE->{Document}; #Not sure if correct
$forms = $doc->{DocumentElement}->{InnerHTML};
$form = $forms->item('field');
$form->{value} = "12345";

# The following code must submit to a page, then put new info in an input field on that new submitted page

但是不行，请问有什么办法吗？我研究了很多，有人建议使用 WWW::Mechanize，但是当我使用它时我无法截取页面的屏幕截图，因为 Mechanize 只是在 CMD 中显示它在做什么，并没有真正打开浏览器。 (顺便说一句，有没有办法用 WWW::Mechanize 打开浏览器并查看实际发生了什么？)

Answer 1

请给出一些细节是如何实现的

doesn't work

要获取屏幕截图，您可以使用 WWW::Mechanize::Firefox 模块:

use WWW::Mechanize::Firefox;
my $mech = WWW::Mechanize::Firefox->new();
$mech->get('http://google.com');

my $png = $mech->content_as_png(); #you have a screen in $png now