https://opennet.dev/openforum/vsluhforumID1/91737.html Здравствуйте, я столкнулся с проблемой в Exim4... для моих задач мне необходимо выполнить функцию perl и сохранить её результат в переменную конфига .. а затем подставить значение этой переменной в директивы конфига Exim4... как я пробовал сделать <br><br>в конфиге exim4 я прописал <br><br>VAR = ${perl{func}}<br><br>а затем подставил VAR в нужных мне местах .. но как оказалось exim4 в тех местах куда я подставил VAR , каждый раз выполнял ${perl{func}} .<br><br>Возможно ли всетаки реально сохранить результат (в моем случаи строка) выполнения функции в переменную конфига exim4 <br><br>документацию я читал, но не нашёл там решения как это можно реализовать <br><br><br><br><br><br><br><br><br> https://opennet.dev/openforum/vsluhforumID1/91737.html#9 Thu, 09 Jun 2011 20:11:49 GMT все проблема решена , помогла переменная $sending_ip_address в транспорте <br><br>я с начала выбрал рендомно ip и назначил его на интерфейс а затем добавил $sending_ip_address в хедеры <br><br> interface = ${perl{randominterface}}<br> helo_data = ${lookup dnsdb{ptr=$sending_ip_address}{$value}{$primary_hostname}}<br> headers_add = X-Originating-IP: [$sending_ip_address] <br><br><br><br><br>&gt; есть список ip выбрать из него рендомно любой ip (это счас я <br>&gt; делаю в perl ) и подставить в interface и дополнительный хедер <br>&gt; .... до тех пор пока я подставлял только в интерфейс <br>&gt; все гуд было .. когда попробовал подставить и в хедер получилось <br>&gt; что в интерфейсе один ip а в хедере другой ... вот <br>&gt; и думаю как это решить ... https://opennet.dev/openforum/vsluhforumID1/91737.html#8 Thu, 09 Jun 2011 18:57:28 GMT есть список ip выбрать из него рендомно любой ip (это счас я делаю в perl ) и подставить в interface и дополнительный хедер .... до тех пор пока я подставлял только в интерфейс все гуд было .. когда попробовал подставить и в хедер получилось что в интерфейсе один ip а в хедере другой ... вот и думаю как это решить ... <br><br>&gt;[оверквотинг удален]<br>&gt;&gt;&gt;&gt;&gt; вот и не получается у меня перебросить значение <br>&gt;&gt;&gt;&gt;&gt; пробовал записать переменную из перла в системное окружение( ENV переменную) а затем <br>&gt;&gt;&gt;&gt;&gt; второй функцией читать значение .. ничего не вышло ... у меня <br>&gt;&gt;&gt;&gt;&gt; он так и не записал туда ничего ... ((( очень печально <br>&gt;&gt;&gt;&gt;&gt; .. так как пока вижу только самый плохой вариант с записью <br>&gt;&gt;&gt;&gt;&gt; в файл и последующим чтением его ... что очень отразиться на <br>&gt;&gt;&gt;&gt;&gt; производительности <br>&gt;&gt;&gt;&gt;&gt;&gt; Как вариант <br>&gt;&gt;&gt;&gt;&gt;&gt; warn set acl_m_my=${perl{func}} <br>&gt;&gt;&gt;&gt;&gt;&gt; VAR == $acl_m_my <br><br> https://opennet.dev/openforum/vsluhforumID1/91737.html#7 Thu, 09 Jun 2011 17:33:07 GMT Короче, постановку задачи в студию , только коротко <br>&gt;[оверквотинг удален]<br>&gt;&gt;&gt;&gt; вот и не получается у меня перебросить значение <br>&gt;&gt;&gt;&gt; пробовал записать переменную из перла в системное окружение( ENV переменную) а затем <br>&gt;&gt;&gt;&gt; второй функцией читать значение .. ничего не вышло ... у меня <br>&gt;&gt;&gt;&gt; он так и не записал туда ничего ... ((( очень печально <br>&gt;&gt;&gt;&gt; .. так как пока вижу только самый плохой вариант с записью <br>&gt;&gt;&gt;&gt; в файл и последующим чтением его ... что очень отразиться на <br>&gt;&gt;&gt;&gt; производительности <br>&gt;&gt;&gt;&gt;&gt; Как вариант <br>&gt;&gt;&gt;&gt;&gt; warn set acl_m_my=${perl{func}} <br>&gt;&gt;&gt;&gt;&gt; VAR == $acl_m_my <br><br> https://opennet.dev/openforum/vsluhforumID1/91737.html#6 Thu, 09 Jun 2011 17:19:17 GMT счас попробовал <br><br>в acl <br><br>acl_check_rcpt:<br> warn set acl_c_my=${perl{randominterface}}<br> accept hosts = :<br> deny<br><br><br>в транспорте <br> interface = $acl_c_my<br><br>пишет пустую строку interface = ${perl{randominterface}}<br><br>все подставляет <br><br>сложность в том что мне нужно одинаковое значение подставить <br>и в interface = $acl_c_my<br>и в headers_add = X-Originating-IP: [$acl_c_my]<br><br>так не работает <br><br><br>елси делаю сразу в транспорте <br><br>&gt;[оверквотинг удален]<br>&gt;&gt;&gt; вот и не получается у меня перебросить значение <br>&gt;&gt;&gt; пробовал записать переменную из перла в системное окружение( ENV переменную) а затем <br>&gt;&gt;&gt; второй функцией читать значение .. ничего не вышло ... у меня <br>&gt;&gt;&gt; он так и не записал туда ничего ... ((( очень печально <br>&gt;&gt;&gt; .. так как пока вижу только самый плохой вариант с записью <br>&gt;&gt;&gt; в файл и последующим чтением его ... что очень отразиться на <br>&gt;&gt;&gt; производительности <br>&gt;&gt;&gt;&gt; Как вариант <br>&gt;&gt;&gt;&gt; warn set acl_m_my=${perl{func}} <br>&gt;&gt;&gt;&gt; VAR == $acl_m_my <br><br> https://opennet.dev/openforum/vsluhforumID1/91737.html#5 Thu, 09 Jun 2011 17:14:11 GMT И вообще зачем юзать макросы , это специфическая вещь , я думаю без нее<br>спокойно можно обойтись <br>&gt;[оверквотинг удален]<br>&gt;&gt; вот и не получается у меня перебросить значение <br>&gt;&gt; пробовал записать переменную из перла в системное окружение( ENV переменную) а затем <br>&gt;&gt; второй функцией читать значение .. ничего не вышло ... у меня <br>&gt;&gt; он так и не записал туда ничего ... ((( очень печально <br>&gt;&gt; .. так как пока вижу только самый плохой вариант с записью <br>&gt;&gt; в файл и последующим чтением его ... что очень отразиться на <br>&gt;&gt; производительности <br>&gt;&gt;&gt; Как вариант <br>&gt;&gt;&gt; warn set acl_m_my=${perl{func}} <br>&gt;&gt;&gt; VAR == $acl_m_my <br><br> https://opennet.dev/openforum/vsluhforumID1/91737.html#4 Thu, 09 Jun 2011 16:59:50 GMT вместо acl_m_my=${perl{randominterface}} <br> <br>acl_с_my=${perl{randominterface}}<br><br>acl_m действует в пределах одного aсl data rcpt ...<br>acl_с действует глобально пока живо письмо <br> <br>&gt;[оверквотинг удален]<br>&gt; вот и не получается у меня перебросить значение <br>&gt; пробовал записать переменную из перла в системное окружение( ENV переменную) а затем <br>&gt; второй функцией читать значение .. ничего не вышло ... у меня <br>&gt; он так и не записал туда ничего ... ((( очень печально <br>&gt; .. так как пока вижу только самый плохой вариант с записью <br>&gt; в файл и последующим чтением его ... что очень отразиться на <br>&gt; производительности <br>&gt;&gt; Как вариант <br>&gt;&gt; warn set acl_m_my=${perl{func}} <br>&gt;&gt; VAR == $acl_m_my <br><br> https://opennet.dev/openforum/vsluhforumID1/91737.html#3 Thu, 09 Jun 2011 16:49:01 GMT не получилось <br><br>объявил VAR= в начале конфига <br><br>затем <br><br>acl_check_rcpt:<br> warn set acl_m_my=${perl{randominterface}}<br> accept hosts = :<br> deny<br><br>после но до директивы транспорта сделал VAR == $acl_m_my <br><br>а в транспорте подставляет пустое значение макроса <br><br>может быть exim чтобы из acl уровня перейти к транспорту запускает другой процесс exim ? <br>вот и не получается у меня перебросить значение <br><br>пробовал записать переменную из перла в системное окружение( ENV переменную) а затем второй функцией читать значение .. ничего не вышло ... у меня он так и не записал туда ничего ... ((( очень печально .. так как пока вижу только самый плохой вариант с записью в файл и последующим чтением его ... что очень отразиться на производительности <br><br>&gt; Как вариант <br>&gt; warn set acl_m_my=${perl{func}} <br>&gt; VAR == $acl_m_my https://opennet.dev/openforum/vsluhforumID1/91737.html#2 Thu, 09 Jun 2011 16:26:14 GMT Как вариант <br><br>warn set acl_m_my=${perl{func}}<br><br>VAR == $acl_m_my<br><br><br>&gt;[оверквотинг удален]<br>&gt; а затем подставить значение этой переменной в директивы конфига Exim4... как <br>&gt; я пробовал сделать <br>&gt; в конфиге exim4 я прописал <br>&gt; VAR = ${perl{func}} <br>&gt; а затем подставил VAR в нужных мне местах .. но как <br>&gt; оказалось exim4 в тех местах куда я подставил VAR , каждый <br>&gt; раз выполнял ${perl{func}} .<br>&gt; Возможно ли всетаки реально сохранить результат (в моем случаи строка) выполнения функции <br>&gt; в переменную конфига exim4 <br>&gt; документацию я читал, но не нашёл там решения как это можно реализовать <br><br> https://opennet.dev/openforum/vsluhforumID1/91737.html#1 Thu, 09 Jun 2011 15:03:03 GMT как я понимаю проблема в том что VAR является макросом а не переменной вот exim4 и каждый раз выполняет его ... но все же .. Возможно как то сохранить и подставить значение в конфиг exim4 ?<br><br><br>