Forum Webscript.Ru
Программирование => Perl => Тема начата: XEN__ от 25 Января 2003, 13:16:11
-
Мастера помогите.
Надо сделать скрипт где нибудь на сайте чтобы принимал сообщения и удалял само сообщения оставляя только
тему сообщения, и от кого письмо, а дальше пересылал эту информацию на другой е-мэйл.
Если сайты кто-нибудь такие знает, где есть редирект с изменением текста сообщения при пересылке,
скажите пожалуйста.
-
Подумай пару часов и напиши подробнее что именно тебе нужно.
-
Ну спасибо тебе.
Ладно мне нужно сделать, чтобы письма которые я получал,
принимал скрипт, брал только имя отправителя и тема и затем
пересылал на другой адрес.
Насчет редиректа я имел ввиду, на многих серверах почты,
возможен редирект на другой адрес эл. почты, но кроме этого мне нужно чтобы текст из сообщения удалялся, а было лишь только поле, от кого и тема.
-
perldoc Net::Pop3
+ sendmail
-
Ну спасибо тебе.
Да не за что.
Chs: perldoc Net::IMAP ;)
-
еще в Юнихе можно настроить чтобы почта приходящая на определенный почтовый ящик автоматом попадала на стандартный вход скрипту.
Описание принципов (с примерами на пхп) можно посмотреть http://php.spb.ru/php/mail_robot.html
И кстати я где-то видел примеры на перле, ссылку не помню.
-
Насколько я помню скрипт назывался Perldesk.
-
Макс
http://www.hotscripts.com/Detailed/13093.html ?
Слегка из другой оперы...
Ближе вещи из http://www.hotscripts.com/Perl/Scripts_and_Programs/Email_Systems/Web-based_Email/
-
Насчет PerlDesc-а, то я его привел как пример perl-скрипта работающего через алиасы к почтовым ящикам (правда я не знал что он платный). ИМХО этот вариант удобнее чем POP3/IMAP так как скрипт будет запускаться автоматически по приходу письма.
-
Спасибо.
http://php.spb.ru/php/mail_robot.html !! - как раз-то что нужно!!!
Веб интерфейс не нужен слишком дого с ним разбираться,
а такой робот как раз.
Есть ли что нибудь подобное уже готовое, чтобы оставалось
только залить на сервер и там уже настроить?
-
Мне, что собственно надо сделать:
чтобы по пришествию почты, мне на сотовый приходило извещение в виде "от кого" и "тема".
-
готового ничего нет.
в perldesc было сделано (насколько я помню) через MIME :: Parser
примерно так:
#!/usr/bin/perl
use MIME::Parser;
my $parser = new MIME::Parser;
$entity = $parser->parse(\\*STDIN);
....
дальше вытаскивай адрес и сабж (как это делается не помню) и посылай письмо