现在发现是程序跑到LWP::Simple里面_trivial_http_get这个函数时候建立socket每次都超时并返回undef。[ol][*]my $sock = IO::Socket::INET->new(PeerAddr => $host,[*]? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?PeerPort => $port,[*]? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?Proto? ? => \'tcp\',[*]? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?? ?Timeout??=> 30) || return undef;[/ol]假设get(\" http://www.sina.com.cn \");$host为 www.sina.com.cn$port 为80继续期待大侠来给个解决方法啊。 查看原帖>>
内容全部来源于网络收集，如有侵权，请联系网站删除!