首页
学习
活动
专区
圈层
工具
发布
首页
学习
活动
专区
圈层
工具
MCP广场
社区首页 >问答首页 >在Perl LWP::UserAgent中取消显示"Day too big“警告

在Perl LWP::UserAgent中取消显示"Day too big“警告
EN

Stack Overflow用户
提问于 2010-02-03 00:22:46
回答 2查看 2.1K关注 0票数 3

我有一个相当简单的perl脚本,它使用LWP::UserAgent模块通过重定向跟踪URL,以找到最终的目的地URL,然后将其存储在我们的MySQL数据库中。问题是,脚本有时会报告类似以下内容的警告:

代码语言:javascript
运行
复制
Day too big - 25592 > 24855
Sec too small - 25592 < 74752
Sec too big - 25592 > 11647
Day too big - 25592 > 24855
Sec too small - 25592 < 74752
Sec too big - 25592 > 11647

警告没有提供任何其他细节,如为什么会发生这种情况,或者是哪个模块导致了问题,但我非常确定这与LWP::UserAgent有关。

我使用以下代码初始化代理:

代码语言:javascript
运行
复制
use LWP::UserAgent;
my $ua = LWP::UserAgent->new(cookie_jar => { },requests_redirectable => [ ]);
$ua->agent('Mozilla/5.0 (X11; U; FreeBSD i386; en-US; rv:9.9.9.9) Gecko/20079999 Firefox/2.0.0.1');
$ua->timeout(10);

我在网上搜索,我找到的唯一结果是下面的帖子,这个帖子从未解析过http://www.mail-archive.com/libwww@perl.org/msg06515.html。线程作者认为这些警告以某种方式与LWP::UserAgent模块捕获的cookie日期有关。

该警告似乎不会影响脚本,但我希望能帮助您更好地理解可能导致此问题的原因,并就如何解决它或至少抑制警告消息提供建议。提前感谢您的帮助!

EN

回答 2

Stack Overflow用户

回答已采纳

发布于 2010-02-03 07:44:56

如果您不能选择升级,您当然可以始终使用local $SIG{__WARN__}处理程序过滤掉警告。

代码语言:javascript
运行
复制
{
    local $SIG{__WARN__} = sub {
        warn @_ unless $_[0] =~ m(^.* too (?:big|small));
    };
    # your code here.
}
票数 7
EN

Stack Overflow用户

发布于 2010-02-03 00:33:05

请参阅Changes

5.833 -10-06版本

Gisle Aas (5):

  • 处理的cookies将在将来的RT#50147
  • 交易中过期,而cookies将在epoch RT#49467

或之前过期

看起来您需要升级到最新版本的LWP

票数 5
EN
页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接:

https://stackoverflow.com/questions/2185641

复制
相关文章

相似问题

领券
问题归档专栏文章快讯文章归档关键词归档开发者手册归档开发者手册 Section 归档