Исходное сообщение
"Как узнать файл из которого был запущен срипт perl" Отправлено metacom, 25-Мрт-10 09:32
>Сгенери персональные коды, раздай юзерам. Пусть предъявляют в каждом вызове mail через >$additional_parameters. Твой скрипт проверяет код. Если код неизвестен - письмо не >уходит. Это не решит вопрос по сабжу.    Нашел выход проще, оказывается в PHP 5.3.0 mail.log добавили, в него как раз всё что мне надо заносится. Остается тока распарсить его, а в случае превышения лимита блокировать отправку с нужного домена (домен я по ENW{PWD} определяю нормально). >Против PEAR::Mail или самодельного SMTP клиента в скрипте требуй SMTP авторизацию, а >прямой выход на чужой 25 порт закрой firewall. А как же я 25 порт закрою? тогда sendmail работать не будет.