Есть скрипт проверки доменов на занятость. Он использует модуль
Regru::API. Работает на Windows.
Код в общих чертах выглядит примерно таким образом:
my $client = Regru::API->new(
username => 'login',
password => 'pass',
);
my %params = (
'domains' => \@domains
);
my $resp = $client->domain->check(%params);
if ($resp->is_success) {
# Обрабатываем ответ
} else {
say "Request error: " . $resp->error_text . " (Code: " . $resp->error_code . ")";
}
При запуске на компьютере заказчика появляется ошибка;
Error: service failed: cant connect to api.reg.ru:443
Bad address at LWP/Protocol/http.pm line 47, <$wf> line 1.
At regru/api/response.pm line 75.
Request error: API response error (Code: API_FAIL)
Из информации о системе известно только то что ОС Windows 7 home premium 64bit (на японском языке), антивирус отключён, файрвола нет. Из браузера запрос к api.reg.ru проходит. Сам скрипт упакован в exe при помощи утилиты
PAR::Packer (pp), все необходимые модули/dll подключены (на чистой системе работоспособность проверена).