Артем Аветисов

Необходимо написать новый скрипт на языке Perl или доработать имеющиеся, служащими HTTP клиентом для совершения POST запросов на сервер и получения ответов от него с идентификацией клиента и сервера SSL сертификатом.

Скрипт должен уметь: подключаться к серверу с идентификацией SSL сертификатом, высылать POST запрос, получать ответ от него, записывая часть строки ответа в переменную.

Вариант POST запроса, который должен высылать скрипт:
-------------
POST /path/subpath/somefile HTTP/1.1
Host: some.host.ru:9443
Content-Type: application/x-www-form-urlencoded
Content-Length: 8

Key1=value1& Key2=value2
---------------

После выбора исполнителя будет предоставлено:

1) ftp доступ к директрии cgi-модуля сайта (сервер проверяет IP клиента);

2) пути на сервере нашего сайта к сертификату .pem, корневому сертификату .crt, к секретному ключу .key;

3) URL адрес POST запроса, номер порта сервера, корректные значения содержания запроса (Key1=value1& Key2=value2)

На данным момент имеются два скрипта на языке Perl, которые разными путями совершают HTTP запрос на сервер: первый скрипт(01.cgi) использует CPAN модуль Net::SSLeay, второй (02.cgi) – IO::Socket::SSL, однако в результате происходит ошибка (непонятная для меня).

Исполнитель может доработать имеющиеся скрипты или написать новый.