Перерыл все интернеты, нигде не могу найти perl скрипт для отправки письма. Задача самая распространенная, настроить уведомление на почту при пропущенном звонке в очереди.
в /etc/asterisk/extensions_override_freepbx.conf внес
[ext-queues]
exten => h,1,ExecIf($["${CDR(dstchannel)}"=""]?System(/usr/local/bin/sendmail.pl -f
адрес@отправителя -t адрес@получателя -u "Queue ${NODEST} missed call from
${CALLERID(num)}" -m "Missed call in Queue ${NODEST} from
${CALLERID(num)}" -o message-charset=UTF-8))
exten => h,2,Macro(hangupcall,)
сама отправка почты работает, если написать mail -s theme мой@адрес < /dev/null