Forum Webscript.Ru

Программирование => Perl => Тема начата: metton от 21 Марта 2004, 16:50:51

Название: обработка ответа на e-mail
Отправлено: metton от 21 Марта 2004, 16:50:51

Всем привет.
Возник такой вопрос.
Как реализуется обработка ответа на письмо от почтового робота (т.е. обычное информационное письмо отправленное НЕ человеком)?
Более конкретно. Пользователь вводит e-mail. Ему приходит письмо на это e-mail. И в зависимости от его ответа (предположим, простейшие "да" и "нет") выполняются разные действия.
Буду благодарен за любые советы (в том числе просто слова, по которым следует искать).

Название: обработка ответа на e-mail
Отправлено: Макс от 21 Марта 2004, 18:37:40

http://php.spb.ru/php/mail_robot.html
статья по ПХП, но алгоритм тот же

Название: обработка ответа на e-mail
Отправлено: metton от 22 Марта 2004, 11:31:48

Макс,
Спасибо за ссылку.
Начал думать как это в perl перевести.

mail.pl (вне каталогов сайта)

Код: [Выделить]


#!/usr/bin/perl
use strict;
open(LOG, "+print LOG "дата\\n";

# $in=fopen("php://stdin","r") or die(); // На что заменить эту строку из статьи?


ЗЫ: интересно мне, кто это писал... ну и язык :rolleyes:

Название: обработка ответа на e-mail
Отправлено: NeoNox от 22 Марта 2004, 12:11:54

perldoc pelipc
man procmail
MIME::Tools

Название: обработка ответа на e-mail
Отправлено: Макс от 22 Марта 2004, 13:08:44

я к перлу уже больше года не прикасался (поэтому может и бред напишу), но примерно так:

Код: [Выделить]

while (my $str = ) {
   $data .=$str;
}
print LOG $data;