javascript - Perl Mechanize 与 Javascript

Question

我开始研究 Perl mechanize 并执行了一项自动化任务，但在网站中遇到了 javascript 问题。

我正在尝试代码的网站在菜单部分之间有一个基于 javascript 的导航(url 保持不变)。 Take a look here

到目前为止，我编写的代码获取了重定向到菜单的链接，如图所示。

$url="https://my.testingurl.com/nav/";
my $mech=WWW::Mechanize->new(autocheck => 1);
$mech->get($url);
$mech->form_name("LoginForm");
$mech->field('UserName','username');
$mech->field('UserPassword','password');
$mech->submit_form();
my $page=$mech->content;
if($page =~  /<meta\s+http-equiv="refresh"\s+content="\d+;\s*url=([^"+]*)"/mi)
{$url=$1 }
$mech->get($url);
print Dumper $mech->find_link(text_regex=>qr/View Results/);

这是输出。

$VAR1 = bless( [
                 '#',
                 'View Results',
                 undef,
                 'a',
                 bless( do{\(my $o = 'https://my.testingurl.com/nav/')}, 'URI::https' ),
                 {
                   'onclick' => 'PageActionGet(\'ChangePage\',\'ResultsSection\',\'\',\'\', true)',
                   'href' => '#'
                 }
               ], 'WWW::Mechanize::Link' );

现在我不知道如何通过单击输出中显示的链接来继续操作，并对导航的其他部分执行相同的操作。

请帮忙。

Answer 1

你不能。 WWW:Mechanize doesn't support Javascript.