Perl lwp用户代理504网关超时

Perl lwp用户代理504网关超时,perl,ssl,lwp,lwp-useragent,Perl,Ssl,Lwp,Lwp Useragent,我正在使用草莓perl 5.22并尝试运行以下代码: use strict; use warnings; use LWP::UserAgent; my $ua = LWP::UserAgent->new(); my $response = $ua->get('https://ransomwaretracker.abuse.ch/feeds/csv/'); if ($response->is_success) { print $response->decode

我正在使用草莓perl 5.22并尝试运行以下代码:

use strict;
use warnings;
use LWP::UserAgent;

my $ua = LWP::UserAgent->new();

my $response = $ua->get('https://ransomwaretracker.abuse.ch/feeds/csv/');

if ($response->is_success) {
    print $response->decoded_content;  
}
else {
    die $response->status_line;
}
我得到504网关

但是,当尝试使用浏览器获取链接时,它会按预期工作吗? 有人能帮忙解决这个问题吗

  • 我尝试了不同的链接,就像预期的那样

  • 我尝试使用
    my$ua=LWP::UserAgent->new(ssl\u opts=>{verify\u hostname=>0})

  • 我收到以下错误:
    500无法连接到。。。(主机名不正确)


    你知道如何解决这个问题吗?

    这是一个服务器端问题,只有当你能用浏览器访问网站时,你才算幸运。我的浏览器也有同样的网关超时。

    您提到的站点现在已关闭。所以你得等它出来。