LWP :: UserAgent для XML POST на сервер HTTPS не работает

Хорошо ... давайте посмотрим, станет ли это яснее.

Я выполняю POST XML-документа через LWP :: UserAgent на удаленный сторонний сервер.

Они ранее прислали мне свои файлы .crt, которые я установил на своем сервере, и проверили их адрес и факт их существования через CPanel и через вызовы командной строки Putty для поиска. Сертификаты есть.

Я убедился, что у меня установлен LWP :: Protocol :: https и все другие необходимые моды Perl, включая Mozilla :: CA, Crypt :: SSLeay и другие.

Когда я запускаю скрипт, я получаю следующую ошибку:

Произошла ошибка

500 Не удается подключиться к shortURL: порт (ошибка проверки сертификата) 500 Не удается подключиться к shortURL: port (ошибка проверки сертификата) Content-Type: text / plain Дата клиента: среда, 25 января 2012 г. 17:53:36 GMT Предупреждение клиента: внутренний ответ Не удается подключиться к shortURL: порт (не удалось проверить сертификат) LWP :: Protocol :: https :: Socket: попытка подключения SSL завершилась неудачно с неизвестной ошибкой: 14090086: подпрограммы SSL: SSL3_GET_SERVER_CERTIFICATE: проверка сертификата не удалась в / usr / lib / perl5 / site_perl / 5.8.8 / LWP / Protocol / http.pm, строка 51.

Вот код вызова:

sub ConsumerInfo {
my $cid = shift;

my $response = undef;
my $sendXML = &Create_ConsumerInfo_Request($cid);
if ($sendXML) {
    &DoXMLUpload($sendXML);

    my $browser = LWP::UserAgent->new(agent => 'site_perl',
        ssl_opts => {
            verify_hostname => 1,
            SSL_ca_path => '/home/<mysite>/ssl/certs/',
        },);
    $browser->credentials('shortURL:port','realm','username'=>'password');
    $response = $browser->request(POST 'longURL',
        Content_Type => 'text/xml',
        Content => $sendXML);
    print "Content-type:text/html\n\n";
    print $response->error_as_HTML unless $response->is_success;
    print $response->as_string;
} else {
    &ErrorMsg("No XML Code Was Found.");
    exit;   
}
# ===============================================================
# Need to insert parser in here to convert this into an array.
# ===============================================================
return $response;
}

Есть предположения? Здесь у меня заканчиваются идеи. :(