Могу ли я подавить сообщение об ошибке от fetch.pm в Perl

При использовании Fetch для загрузки URL-адреса из Teamcity, я получил Fetch fail! ошибка. Но загрузка файла на самом деле работает.

Недавно они изменили разрешения нашего сервера Teamcity, поэтому я должен использовать имя пользователя и пароль при получении URL-адреса файла для загрузки. Мне просто интересно, если это вызывает проблему с проверкой извлечения шлюза, но как я могу скачать файл. Есть ли способ подавить эту ошибку или просто понизить ее до предупреждения?

Perl Code:
my $ff = File::Fetch->new(uri => "$uri"); 
my $where = $ff->fetch   ( to => "$DOWNLOAD_LOCATION" );
print Dumper($ff);

Output:    
Fetch failed! HTTP response: 502 Bad Gateway [502 notresolvable] at         
<path>\myfile.pl line 249.

Dumper Output:
$VAR1 = bless( {'vol' => '',
                'file_default' => 'file_default',
                '_error_msg' => 'Fetch failed! HTTP response: 502 Bad Gateway [502 notresolvable]',
                'file' => 'myfilename.zip',
                'scheme' => 'http',
                'path' => '/repository/download/buildlabel/1042086:id/',
                '_error_msg_long' => 'Fetch failed! HTTP response: 502 Bad    Gateway [502 notresolvable] at C:/Perl/lib/File/Fetch.pm line 598.

Ответы на вопрос(2)

Ваш ответ на вопрос