[Comm] sa-learn and spam

[Oleksandr Chuchko]

Hello, Slava.

You wrote 12 апреля 2005 г., 9:17:20:

>>D> Знатоки перла, объясните пожалуйста, что означает последняя строчка в
>>SD> скрипте и почему она не работает?
>>
>>Похоже, эта строчка должна удалять временную директорию, в которую
>>MIME::Parser складывает части сообщения. Правда, $parser->filer->purge
>>делает это раньше ;-). По крайней мере, при корректной работе. Я ее
>>просто закомментировал.
>>
SD> Да, я тоже пробовал без нее. Но скрипт не отрабатывает. Причем ошибка
SD> какая-то плавающая. Похоже спотыкается когда присутствуют русские
SD> символы и когда вложений больше одного. Не замечали подобного?

Не замечал. Попробуйте эту строчку: unlink "/tmp/spam.log.$$" if -e "/tmp/spam.log.$$";
перенести вниз вот так:

if ($@) {
    die $@;
} else {
    if ($DEBUG) {
            unlink "/tmp/spam.log.$$" if -e "/tmp/spam.log.$$";
        }
    recurs($entity);
}


тогда в spam.log.$$ будет описана обработка всех сообщений, а не только
последнего

-- 
With best regards,
 Oleksandr Chuchko                          mailto:forlists на mail.ru