<?xml version="1.0" encoding="koi8-r"?>
<rss version="0.91">
<channel>
    <title>OpenForum RSS: Как узнать файл из которого был запущен срипт perl</title>
    <link>https://www.opennet.me/openforum/vsluhforumID9/8655.html</link>
    <description>Пишу sendmail wrapper на perl, для php sendmail, подскажите как на perl определить имя и путь файла который инициировал данный скрипт. &lt;br&gt;&lt;br&gt;т.е. в php.ini вместо стандартного sendmail, я помещаю мой sendmail.pl, соответственно когда php отправляет почту при помощи функции sendmail, запускается мой sendmail.pl вот в нем то мне надо опредилить имя php файла в котором сработала фунция sendmail. Я так понимаю что эта информация должна быть в массиве $env, подскажите в каком ключе.&lt;br&gt;</description>

<item>
    <title>Как узнать файл из которого был запущен срипт perl (ACCA)</title>
    <link>https://www.opennet.me/openforum/vsluhforumID9/8655.html#5</link>
    <pubDate>Thu, 25 Mar 2010 18:19:57 GMT</pubDate>
    <description>&amp;gt;&amp;gt;Против PEAR::Mail или самодельного SMTP клиента в скрипте требуй SMTP авторизацию, а &lt;br&gt;&amp;gt;&amp;gt;прямой выход на чужой 25 порт закрой firewall. &lt;br&gt;&amp;gt;&lt;br&gt;&amp;gt;А как же я 25 порт закрою? тогда sendmail работать не будет. &lt;br&gt;&lt;br&gt;man iptables&lt;br&gt;&lt;br&gt;-m owner --cmd-owner ...&lt;br&gt;&lt;br&gt;</description>
</item>

<item>
    <title>Как узнать файл из которого был запущен срипт perl (metacom)</title>
    <link>https://www.opennet.me/openforum/vsluhforumID9/8655.html#4</link>
    <pubDate>Thu, 25 Mar 2010 06:32:25 GMT</pubDate>
    <description>&amp;gt;Сгенери персональные коды, раздай юзерам. Пусть предъявляют в каждом вызове mail через &lt;br&gt;&amp;gt;$additional_parameters. Твой скрипт проверяет код. Если код неизвестен - письмо не &lt;br&gt;&amp;gt;уходит.&lt;br&gt;&lt;br&gt;Это не решит вопрос по сабжу.&lt;br&gt;  &lt;br&gt;Нашел выход проще, оказывается в PHP 5.3.0 mail.log добавили, в него как раз всё что мне надо заносится. Остается тока распарсить его, а в случае превышения лимита блокировать отправку с нужного домена (домен я по ENW&#123;PWD&#125; определяю нормально).&lt;br&gt;&lt;br&gt;&amp;gt;Против PEAR::Mail или самодельного SMTP клиента в скрипте требуй SMTP авторизацию, а &lt;br&gt;&amp;gt;прямой выход на чужой 25 порт закрой firewall. &lt;br&gt;&lt;br&gt;А как же я 25 порт закрою? тогда sendmail работать не будет.&lt;br&gt;</description>
</item>

<item>
    <title>Как узнать файл из которого был запущен срипт perl (ACCA)</title>
    <link>https://www.opennet.me/openforum/vsluhforumID9/8655.html#3</link>
    <pubDate>Thu, 25 Mar 2010 04:30:14 GMT</pubDate>
    <description>&amp;gt;&amp;gt;Проще всего - пропихни $_SERVER&#091;&quot;SCRIPT_NAME&quot;&#093; параметром в командной строке. &lt;br&gt;&amp;gt;&lt;br&gt;&amp;gt;Немогу я его через командную строку передать, у меня сервер LAMP, на &lt;br&gt;&amp;gt;нем крутятся порядка 20 сайтов, мне надо отследить рассылку спама, чтобы &lt;br&gt;&amp;gt;при превышении лимита, включалась блокировка отправки почты с уведомлением, - какой &lt;br&gt;&lt;br&gt;Сгенери персональные коды, раздай юзерам. Пусть предъявляют в каждом вызове mail через $additional_parameters. Твой скрипт проверяет код. Если код неизвестен - письмо не уходит.&lt;br&gt;&lt;br&gt;Против PEAR::Mail или самодельного SMTP клиента в скрипте требуй SMTP авторизацию, а прямой выход на чужой 25 порт закрой firewall.&lt;br&gt;</description>
</item>

<item>
    <title>Как узнать файл из которого был запущен срипт perl (metacom)</title>
    <link>https://www.opennet.me/openforum/vsluhforumID9/8655.html#2</link>
    <pubDate>Tue, 23 Mar 2010 08:37:26 GMT</pubDate>
    <description>&amp;gt;Проще всего - пропихни $_SERVER&#091;&quot;SCRIPT_NAME&quot;&#093; параметром в командной строке. &lt;br&gt;&lt;br&gt;Немогу я его через командную строку передать, у меня сервер LAMP, на нем крутятся порядка 20 сайтов, мне надо отследить рассылку спама, чтобы при превышении лимита, включалась блокировка отправки почты с уведомлением, - какой скрипт, в папке какого домена... &lt;br&gt;&lt;br&gt;свой враппер я прописываю в httpd.conf через директиву:&lt;br&gt;php_admin_value sendmail_path &apos;/usr/sbin/sendmail.pl -t -i&apos; &lt;br&gt;&lt;br&gt;Может есть еще варианты? ENV&#123;PWD&#125; получает, т.е. частично проблемма решается, но ENV&#123;PWD&#125; это только директория, вот бы еще сам скрипт отковырять.&lt;br&gt;</description>
</item>

<item>
    <title>Как узнать файл из которого был запущен срипт perl (ACCA)</title>
    <link>https://www.opennet.me/openforum/vsluhforumID9/8655.html#1</link>
    <pubDate>Tue, 23 Mar 2010 07:39:03 GMT</pubDate>
    <description>&amp;gt;сработала фунция sendmail. Я так понимаю что эта информация должна быть &lt;br&gt;&amp;gt;в массиве $env, подскажите в каком ключе. &lt;br&gt;&lt;br&gt;Нет, не должна, это тебе не HTTP referer. $PPID есть только в bash, лазить по /proc не поможет - в общем случае ты можешь оказаться и в мастдае и в BSD.&lt;br&gt;&lt;br&gt;Проще всего - пропихни $_SERVER&#091;&quot;SCRIPT_NAME&quot;&#093; параметром в командной строке.&lt;br&gt;</description>
</item>

</channel>
</rss>
