LINUX.ORG.RU

Perl sendmail to Telegram Bot API TLS1.2 и в Битрикс24

 , ,


0

1

Есть у меня скрипт на сайте sendmail.pl отправляющий данные с сайта в базу данных, телеграм и битрикс24. Там еще СМС.ру но с ним все ок, как и с отправкой в БД. Все работало прекрасно то отключения на днях телеграм поддержки старых протоколов шифрования (использовался sha1). Сайт находится на шаред хостинге таймвеб.

Соответсвенно у меня вопросы, т.к. только изучаю язык.

Как правильно указать путь до библиотек. Какую библиотеку удобнее и надежнее использовать для tls 1.2 и как поправить рабочий скрипт? Можно и на TLS 1.3 также, как я понимаю.

Буду признателен за помощь или свое предложение по помощи за вознаграждение.

[cut=Сам скрипт сейчас] [code=perl]

package sendmail; use strict; use Encode; use JSON; use LWP::UserAgent; use MIME::Lite; use Digest::SHA qw(sha512_hex);

Кусок с telegram и битрикс

# отправляем в битрикс
$msg =~ s#<[^>]+?>#\n#g;
if ($conf::CRM_HOST && $conf::CRM_LOGIN && $conf::CRM_PASSWORD && $conf::CRM_TITLE) {
	my $response = $ua->post($conf::CRM_HOST, [
		"LOGIN"		=> $conf::CRM_LOGIN, 
		"PASSWORD"	=> $conf::CRM_PASSWORD, 
		"TITLE"		=> $conf::CRM_TITLE,
		'NAME' 		=> $fio,
		'EMAIL_HOME' => $email,
		'PHONE_HOME' => $tel,
		'COMMENTS' => $title - $text,
		'SOURCE_DESCRIPTION' => $msg,
		'SOURCE_ID' => "WEB",
	] ); 
	return($response->status_line) if !$response->is_success;
}

Телеграмм сам сделал. Битрикс еще под вопросом.

Ответ на: комментарий от DELIRIUM

Изменение разметки

Если разметка не дает варианта изменения на LORCODE, то вопрос следует пересоздать или есть способ изменить?

codeme ()

копай в сторону IO::Socket::SSL (что-то вроде такого)

если проблема с ssl,то скрипт обновлять не нужно,
а нужно посмотреть версии Perl-a, IO::Socket::SSL, что выбирает IO::Socket::SSL, обновить по необходимости

pru-mike ★★ ()
Ограничение на отправку комментариев: только для зарегистрированных пользователей