perl - WWW::Mechanize::Firefox 超时

Question

当我尝试使 ->get(URL) 时如何正确使用超时请求 WWW::Mechanize::Firefox ?
my $mech = WWW::Mechanize::Firefox->new(timeout => 10);似乎不起作用

Answer 1

可以模拟这一点，至少在很大程度上是可以的。

您可以关闭 get 的同步，在这种情况下，调用应立即返回。然后每 $sleep_time 轮询一次直到超时，测试页面是否完成。 sleep 允许所有其他好的页面完成，所以设置 $sleep_time作为适当的。

my $timeout = 10; 
my $sleep_time = 1;

my $page = get($url, synchronize => 0); 

for (1..$timeout) {
    # Test some page property that will confirm that it loaded
    last if $page->title eq $expected_title;
    sleep $sleep_time;
}

存在如何准确确认每个页面的问题，但这应该提供工作超时。