LWP用戶代理504 gatway超時

Question

我使用草莓的Perl 5.22，並嘗試運行folllowing代碼：

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網關

但是當嘗試使用它作爲瀏覽器抓取的鏈接預計？ 有人可以幫助解決這個問題？

1. 我嘗試了不同的鏈接像http://google.com它按預期工作

2. 我試圖用my $ua = LWP::UserAgent->new(ssl_opts => { verify_hostname => 0});

我收到以下錯誤：500 Can't connect to ... (bad hostname)

任何想法如何解決這個問題 ？

Answer 1

這是一個服務器端問題，如果您可以通過瀏覽器訪問該網站，您只是幸運。我也使用瀏覽器獲得相同的網關超時時間。