Продолжая ворошить старые скрипты, уже в другом месте и по другому поводу столкнулся с проблемой следующего плана: для отправки email-сообщений с вложениями из тела скрипта используется функция, вызывающая sendеmail с нужными параметрами:
function file2email {И при переносе функция сломалась:
if [ -e $FILE ]; then
echo "Sending..." >> /var/log/send.log
/usr/bin/sendemail -f script@example.org -t admin@example.org \
-m "You received file $FILE from $USER" \
-a $FILE -o tls=yes -s smtp.example.org \
-xu script@example.org -xp secretpass \
-u "File from $USER" -l /var/log/sendemail.log
fi
}
invalid SSL_version specified at /usr/share/perl5/IO/Socket/SSL.pm line 332На просторах Сети нашлась таблетка: в строке 1490 вышеуказанного файла заменить строчку
на строчкуm{^(!?)(?:(SSL(?:v2|v3|v23|v2/3))|(TLSv1[12]?))$}i
Благодарность неизвестному мне товарищу =)m{^(!?)(?:(SSL(?:v2|v3|v23|v2/3))|(TLSv1[12]?))}i
Комментариев нет:
Отправить комментарий