如何使用Perl的WWW :: Mechanize从超时中恢复？

Question

我正在使用WWW :: Mechanize来读取每隔几秒运行一次的循环中的特定网页.偶尔,'GET'超时并且脚本停止运行.如何从一个这样的超时恢复,以便它继续循环并在下一次尝试'GET'？

Answer 1

使用eval：

eval {
    my $resp = $mech->get($url);
    $resp->is_success or die $resp->status_line;
    # your code
};

if ($@) {
    print "Recovered from a GET error\n";    
}

该eval块将捕获获取页面时的任何错误。