LWP UserAgent 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

Это проблема на стороне сервера, и вам повезло, если вы можете получить доступ к сайту с помощью браузера. Я получаю тот же самый тайм-аут шлюза с браузером.