forum.opennet.ru - "Exim 4.7 : сохранить результат выполнения perl " (9)

форумы

помощь

поиск

регистрация

майллист

вход/выход

слежка

"Exim 4.7 : сохранить результат выполнения perl "

Форум Открытые системы на сервере (Почта)
Вариант для распечатки		Пред. тема \| След. тема
Изначальное сообщение		[ Отслеживать ]

"Exim 4.7 : сохранить результат выполнения perl "	+/–
Сообщение от uchti (ok) on 09-Июн-11, 18:37
Здравствуйте, я столкнулся с проблемой в Exim4... для моих задач мне необходимо выполнить функцию perl и сохранить её результат в переменную конфига .. а затем подставить значение этой переменной в директивы конфига Exim4... как я пробовал сделать в конфиге exim4 я прописал VAR = ${perl{func}} а затем подставил VAR в нужных мне местах .. но как оказалось exim4 в тех местах куда я подставил VAR , каждый раз выполнял ${perl{func}} . Возможно ли всетаки реально сохранить результат (в моем случаи строка) выполнения функции в переменную конфига exim4 документацию я читал, но не нашёл там решения как это можно реализовать
Ответить \| Правка \| Cообщить модератору

Оглавление

Exim 4.7 : сохранить результат выполнения perl , uchti, 19:03 , 09-Июн-11, (1)
Exim 4.7 : сохранить результат выполнения perl , Bosh, 20:26 , 09-Июн-11, (2)

Exim 4.7 : сохранить результат выполнения perl , uchti, 20:49 , 09-Июн-11, (3)

Exim 4.7 : сохранить результат выполнения perl , Bosh, 20:59 , 09-Июн-11, (4)

Exim 4.7 : сохранить результат выполнения perl , Bosh, 21:14 , 09-Июн-11, (5)

Exim 4.7 : сохранить результат выполнения perl , uchti, 21:19 , 09-Июн-11, (6)

Exim 4.7 : сохранить результат выполнения perl , Bosh, 21:33 , 09-Июн-11, (7)

Exim 4.7 : сохранить результат выполнения perl , uchti, 22:57 , 09-Июн-11, (8)

Exim 4.7 : сохранить результат выполнения perl , uchti, 00:11 , 10-Июн-11, (9)

Сообщения по теме [Сортировка по времени | RSS]

1. "Exim 4.7 : сохранить результат выполнения perl " +/–

Сообщение от uchti (ok) on 09-Июн-11, 19:03

как я понимаю проблема в том что VAR является макросом а не переменной вот exim4 и каждый раз выполняет его ... но все же .. Возможно как то сохранить и подставить значение в конфиг exim4 ?

Ответить | Правка | ^ к родителю #0 | Наверх | Cообщить модератору

2. "Exim 4.7 : сохранить результат выполнения perl " +/–

Сообщение от Bosh on 09-Июн-11, 20:26

Как вариант
warn set acl_m_my=${perl{func}}
VAR == $acl_m_my

>[оверквотинг удален]
> а затем подставить значение этой переменной в директивы конфига Exim4... как
> я пробовал сделать
> в конфиге exim4 я прописал
> VAR = ${perl{func}}
> а затем подставил  VAR в нужных мне местах .. но как
> оказалось exim4 в тех местах куда я подставил VAR , каждый
> раз выполнял ${perl{func}} .
> Возможно ли всетаки реально сохранить результат (в моем случаи строка) выполнения функции
> в переменную конфига exim4
> документацию я читал, но не нашёл там решения как это можно реализовать

Ответить | Правка | ^ к родителю #0 | Наверх | Cообщить модератору

3. "Exim 4.7 : сохранить результат выполнения perl " +/–

Сообщение от uchti (ok) on 09-Июн-11, 20:49

не получилось
объявил VAR=  в начале конфига
затем
acl_check_rcpt:
  warn set acl_m_my=${perl{randominterface}}
  accept  hosts = :
  deny
после но до директивы транспорта сделал VAR == $acl_m_my
а в транспорте подставляет пустое значение макроса
может быть exim чтобы из acl уровня перейти к транспорту запускает другой процесс exim ?
вот и не получается у меня перебросить значение
пробовал записать переменную из перла в системное окружение( ENV переменную) а затем второй функцией читать значение .. ничего не вышло ... у меня он так и не записал туда ничего ... ((( очень печально .. так как пока вижу только самый плохой вариант с записью в файл и последующим чтением его ... что очень отразиться на производительности
> Как вариант
> warn set acl_m_my=${perl{func}}
> VAR == $acl_m_my

Ответить | Правка | ^ к родителю #2 | Наверх | Cообщить модератору

4. "Exim 4.7 : сохранить результат выполнения perl " +/–

Сообщение от Bosh on 09-Июн-11, 20:59

вместо acl_m_my=${perl{randominterface}}

acl_с_my=${perl{randominterface}}
acl_m действует в пределах одного aсl  data rcpt ...
acl_с действует глобально пока живо письмо

>[оверквотинг удален]
> вот и не получается у меня перебросить значение
> пробовал записать переменную из перла в системное окружение( ENV переменную) а затем
> второй функцией читать значение .. ничего не вышло ... у меня
> он так и не записал туда ничего ... ((( очень печально
> .. так как пока вижу только самый плохой вариант с записью
> в файл и последующим чтением его ... что очень отразиться на
> производительности
>> Как вариант
>> warn set acl_m_my=${perl{func}}
>> VAR == $acl_m_my

Ответить | Правка | ^ к родителю #3 | Наверх | Cообщить модератору

5. "Exim 4.7 : сохранить результат выполнения perl " +/–

Сообщение от Bosh on 09-Июн-11, 21:14

И вообще зачем юзать макросы ,  это специфическая вещь ,  я думаю без нее
спокойно можно обойтись
>[оверквотинг удален]
>> вот и не получается у меня перебросить значение
>> пробовал записать переменную из перла в системное окружение( ENV переменную) а затем
>> второй функцией читать значение .. ничего не вышло ... у меня
>> он так и не записал туда ничего ... ((( очень печально
>> .. так как пока вижу только самый плохой вариант с записью
>> в файл и последующим чтением его ... что очень отразиться на
>> производительности
>>> Как вариант
>>> warn set acl_m_my=${perl{func}}
>>> VAR == $acl_m_my

Ответить | Правка | ^ к родителю #4 | Наверх | Cообщить модератору

6. "Exim 4.7 : сохранить результат выполнения perl " +/–

Сообщение от uchti (ok) on 09-Июн-11, 21:19

счас попробовал
в acl
acl_check_rcpt:
  warn set acl_c_my=${perl{randominterface}}
  accept  hosts = :
  deny

в транспорте
  interface = $acl_c_my
пишет пустую строку  interface = ${perl{randominterface}}
все подставляет
сложность в том что мне нужно одинаковое значение подставить
и в interface = $acl_c_my
и в headers_add = X-Originating-IP: [$acl_c_my]
так не работает

елси делаю сразу в транспорте
>[оверквотинг удален]
>>> вот и не получается у меня перебросить значение
>>> пробовал записать переменную из перла в системное окружение( ENV переменную) а затем
>>> второй функцией читать значение .. ничего не вышло ... у меня
>>> он так и не записал туда ничего ... ((( очень печально
>>> .. так как пока вижу только самый плохой вариант с записью
>>> в файл и последующим чтением его ... что очень отразиться на
>>> производительности
>>>> Как вариант
>>>> warn set acl_m_my=${perl{func}}
>>>> VAR == $acl_m_my

Ответить | Правка | ^ к родителю #5 | Наверх | Cообщить модератору

7. "Exim 4.7 : сохранить результат выполнения perl " +/–

Сообщение от Bosh on 09-Июн-11, 21:33

Короче, постановку задачи в студию ,  только коротко
>[оверквотинг удален]
>>>> вот и не получается у меня перебросить значение
>>>> пробовал записать переменную из перла в системное окружение( ENV переменную) а затем
>>>> второй функцией читать значение .. ничего не вышло ... у меня
>>>> он так и не записал туда ничего ... ((( очень печально
>>>> .. так как пока вижу только самый плохой вариант с записью
>>>> в файл и последующим чтением его ... что очень отразиться на
>>>> производительности
>>>>> Как вариант
>>>>> warn set acl_m_my=${perl{func}}
>>>>> VAR == $acl_m_my

Ответить | Правка | ^ к родителю #6 | Наверх | Cообщить модератору

8. "Exim 4.7 : сохранить результат выполнения perl " +/–

Сообщение от uchti (ok) on 09-Июн-11, 22:57

есть список ip выбрать из него рендомно любой ip (это счас я делаю в perl ) и подставить в interface и дополнительный хедер  .... до тех пор пока я подставлял только в интерфейс все гуд было .. когда попробовал подставить и в хедер получилось что в интерфейсе один ip а в хедере другой ... вот и думаю как это решить ...
>[оверквотинг удален]
>>>>> вот и не получается у меня перебросить значение
>>>>> пробовал записать переменную из перла в системное окружение( ENV переменную) а затем
>>>>> второй функцией читать значение .. ничего не вышло ... у меня
>>>>> он так и не записал туда ничего ... ((( очень печально
>>>>> .. так как пока вижу только самый плохой вариант с записью
>>>>> в файл и последующим чтением его ... что очень отразиться на
>>>>> производительности
>>>>>> Как вариант
>>>>>> warn set acl_m_my=${perl{func}}
>>>>>> VAR == $acl_m_my

Ответить | Правка | ^ к родителю #7 | Наверх | Cообщить модератору

9. "Exim 4.7 : сохранить результат выполнения perl " +/–

Сообщение от uchti (ok) on 10-Июн-11, 00:11

все проблема решена , помогла переменная $sending_ip_address в транспорте
я с начала выбрал рендомно ip и назначил его на интерфейс а затем добавил $sending_ip_address в хедеры
  interface = ${perl{randominterface}}
  helo_data = ${lookup dnsdb{ptr=$sending_ip_address}{$value}{$primary_hostname}}
  headers_add = X-Originating-IP: [$sending_ip_address]

> есть список ip выбрать из него рендомно любой ip (это счас я
> делаю в perl ) и подставить в interface и дополнительный хедер
>  .... до тех пор пока я подставлял только в интерфейс
> все гуд было .. когда попробовал подставить и в хедер получилось
> что в интерфейсе один ip а в хедере другой ... вот
> и думаю как это решить ...

Ответить | Правка | ^ к родителю #8 | Наверх | Cообщить модератору

Архив | Удалить

Рекомендовать для помещения в FAQ | Индекс форумов | Темы | Пред. тема | След. тема

Партнёры:

Хостинг:

Закладки на сайте
Проследить за страницей

Created 1996-2025 by Maxim Chirkov
Добавить, Поддержать, Вебмастеру

1. "Exim 4.7 : сохранить результат выполнения perl "	+/–
Сообщение от uchti (ok) on 09-Июн-11, 19:03
как я понимаю проблема в том что VAR является макросом а не переменной вот exim4 и каждый раз выполняет его ... но все же .. Возможно как то сохранить и подставить значение в конфиг exim4 ?
Ответить \| Правка \| ^ к родителю #0 \| Наверх \| Cообщить модератору

2. "Exim 4.7 : сохранить результат выполнения perl "	+/–
Сообщение от Bosh on 09-Июн-11, 20:26
Как вариант warn set acl_m_my=${perl{func}} VAR == $acl_m_my >[оверквотинг удален] > а затем подставить значение этой переменной в директивы конфига Exim4... как > я пробовал сделать > в конфиге exim4 я прописал > VAR = ${perl{func}} > а затем подставил VAR в нужных мне местах .. но как > оказалось exim4 в тех местах куда я подставил VAR , каждый > раз выполнял ${perl{func}} . > Возможно ли всетаки реально сохранить результат (в моем случаи строка) выполнения функции > в переменную конфига exim4 > документацию я читал, но не нашёл там решения как это можно реализовать
Ответить \| Правка \| ^ к родителю #0 \| Наверх \| Cообщить модератору


	3. "Exim 4.7 : сохранить результат выполнения perl "	+/–
	Сообщение от uchti (ok) on 09-Июн-11, 20:49
	не получилось объявил VAR= в начале конфига затем acl_check_rcpt: warn set acl_m_my=${perl{randominterface}} accept hosts = : deny после но до директивы транспорта сделал VAR == $acl_m_my а в транспорте подставляет пустое значение макроса может быть exim чтобы из acl уровня перейти к транспорту запускает другой процесс exim ? вот и не получается у меня перебросить значение пробовал записать переменную из перла в системное окружение( ENV переменную) а затем второй функцией читать значение .. ничего не вышло ... у меня он так и не записал туда ничего ... ((( очень печально .. так как пока вижу только самый плохой вариант с записью в файл и последующим чтением его ... что очень отразиться на производительности > Как вариант > warn set acl_m_my=${perl{func}} > VAR == $acl_m_my
	Ответить \| Правка \| ^ к родителю #2 \| Наверх \| Cообщить модератору


	4. "Exim 4.7 : сохранить результат выполнения perl "	+/–
	Сообщение от Bosh on 09-Июн-11, 20:59
	вместо acl_m_my=${perl{randominterface}} acl_с_my=${perl{randominterface}} acl_m действует в пределах одного aсl data rcpt ... acl_с действует глобально пока живо письмо >[оверквотинг удален] > вот и не получается у меня перебросить значение > пробовал записать переменную из перла в системное окружение( ENV переменную) а затем > второй функцией читать значение .. ничего не вышло ... у меня > он так и не записал туда ничего ... ((( очень печально > .. так как пока вижу только самый плохой вариант с записью > в файл и последующим чтением его ... что очень отразиться на > производительности >> Как вариант >> warn set acl_m_my=${perl{func}} >> VAR == $acl_m_my
	Ответить \| Правка \| ^ к родителю #3 \| Наверх \| Cообщить модератору


	5. "Exim 4.7 : сохранить результат выполнения perl "	+/–
	Сообщение от Bosh on 09-Июн-11, 21:14
	И вообще зачем юзать макросы , это специфическая вещь , я думаю без нее спокойно можно обойтись >[оверквотинг удален] >> вот и не получается у меня перебросить значение >> пробовал записать переменную из перла в системное окружение( ENV переменную) а затем >> второй функцией читать значение .. ничего не вышло ... у меня >> он так и не записал туда ничего ... ((( очень печально >> .. так как пока вижу только самый плохой вариант с записью >> в файл и последующим чтением его ... что очень отразиться на >> производительности >>> Как вариант >>> warn set acl_m_my=${perl{func}} >>> VAR == $acl_m_my
	Ответить \| Правка \| ^ к родителю #4 \| Наверх \| Cообщить модератору


	6. "Exim 4.7 : сохранить результат выполнения perl "	+/–
	Сообщение от uchti (ok) on 09-Июн-11, 21:19
	счас попробовал в acl acl_check_rcpt: warn set acl_c_my=${perl{randominterface}} accept hosts = : deny в транспорте interface = $acl_c_my пишет пустую строку interface = ${perl{randominterface}} все подставляет сложность в том что мне нужно одинаковое значение подставить и в interface = $acl_c_my и в headers_add = X-Originating-IP: [$acl_c_my] так не работает елси делаю сразу в транспорте >[оверквотинг удален] >>> вот и не получается у меня перебросить значение >>> пробовал записать переменную из перла в системное окружение( ENV переменную) а затем >>> второй функцией читать значение .. ничего не вышло ... у меня >>> он так и не записал туда ничего ... ((( очень печально >>> .. так как пока вижу только самый плохой вариант с записью >>> в файл и последующим чтением его ... что очень отразиться на >>> производительности >>>> Как вариант >>>> warn set acl_m_my=${perl{func}} >>>> VAR == $acl_m_my
	Ответить \| Правка \| ^ к родителю #5 \| Наверх \| Cообщить модератору


	7. "Exim 4.7 : сохранить результат выполнения perl "	+/–
	Сообщение от Bosh on 09-Июн-11, 21:33
	Короче, постановку задачи в студию , только коротко >[оверквотинг удален] >>>> вот и не получается у меня перебросить значение >>>> пробовал записать переменную из перла в системное окружение( ENV переменную) а затем >>>> второй функцией читать значение .. ничего не вышло ... у меня >>>> он так и не записал туда ничего ... ((( очень печально >>>> .. так как пока вижу только самый плохой вариант с записью >>>> в файл и последующим чтением его ... что очень отразиться на >>>> производительности >>>>> Как вариант >>>>> warn set acl_m_my=${perl{func}} >>>>> VAR == $acl_m_my
	Ответить \| Правка \| ^ к родителю #6 \| Наверх \| Cообщить модератору


	8. "Exim 4.7 : сохранить результат выполнения perl "	+/–
	Сообщение от uchti (ok) on 09-Июн-11, 22:57
	есть список ip выбрать из него рендомно любой ip (это счас я делаю в perl ) и подставить в interface и дополнительный хедер .... до тех пор пока я подставлял только в интерфейс все гуд было .. когда попробовал подставить и в хедер получилось что в интерфейсе один ip а в хедере другой ... вот и думаю как это решить ... >[оверквотинг удален] >>>>> вот и не получается у меня перебросить значение >>>>> пробовал записать переменную из перла в системное окружение( ENV переменную) а затем >>>>> второй функцией читать значение .. ничего не вышло ... у меня >>>>> он так и не записал туда ничего ... ((( очень печально >>>>> .. так как пока вижу только самый плохой вариант с записью >>>>> в файл и последующим чтением его ... что очень отразиться на >>>>> производительности >>>>>> Как вариант >>>>>> warn set acl_m_my=${perl{func}} >>>>>> VAR == $acl_m_my
	Ответить \| Правка \| ^ к родителю #7 \| Наверх \| Cообщить модератору


	9. "Exim 4.7 : сохранить результат выполнения perl "	+/–
	Сообщение от uchti (ok) on 10-Июн-11, 00:11
	все проблема решена , помогла переменная $sending_ip_address в транспорте я с начала выбрал рендомно ip и назначил его на интерфейс а затем добавил $sending_ip_address в хедеры interface = ${perl{randominterface}} helo_data = ${lookup dnsdb{ptr=$sending_ip_address}{$value}{$primary_hostname}} headers_add = X-Originating-IP: [$sending_ip_address] > есть список ip выбрать из него рендомно любой ip (это счас я > делаю в perl ) и подставить в interface и дополнительный хедер > .... до тех пор пока я подставлял только в интерфейс > все гуд было .. когда попробовал подставить и в хедер получилось > что в интерфейсе один ip а в хедере другой ... вот > и думаю как это решить ...
	Ответить \| Правка \| ^ к родителю #8 \| Наверх \| Cообщить модератору