Получение страницы через LWP::UserAgent с прокси. Также не работает с Wget и Curl. Браузер работает отлично

У меня был очень простой скрипт (см. Пример), загружающий мой отчет с нашего внутреннего сервера в течение нескольких месяцев. Затем ИТ-отдел внес некоторые изменения в инфраструктуру, и с тех пор я больше не могу заставить этот скрипт работать.

Я могу получить файл с помощью Chrome или Internet Explorer, но не с помощью Perl или Python. Даже wget и curl терпят неудачу.

  • Если я предоставлю неверные учетные данные прокси-сервера, я получу 407 Proxy Authentication,

  • Если установить тайм-аут на 60 секунд, я получу 500 read timeout,

  • Если я установлю тайм-аут на 90 секунд, я получу 503 Service Unavailable, Скручиваемость возвращается network timeout,

ИТ-отдел настаивает на том, что если браузер работает, то проблем нет. Я что-то упускаю?

Образец Perl

require LWP::UserAgent;

my $url =  "http://xxx.xxx.xxx.xxx/StandardReport.aspx?itemid=yyyy&date=dd-mm-yyyy&adjustments&xml=1";

my $ua = LWP::UserAgent->new;
$ua->timeout(90);
$ua->proxy(['http', 'ftp'], 'http://my_user:my_password@proxy_uri:8080');

my $response = $ua->get($url);

if ( $response->is_success ) {
    print $response->decoded_content;  
}
else {
    die $response->status_line;
}

0 ответов

Другие вопросы по тегам