форумы  помощь  поиск  регистрация  майллист  ВХОД  слежка

Вариант для распечатки		Пред. тема | След. тема
Форумы Программирование под UNIX (Public)
Изначальное сообщение		[Проследить за развитием треда]

"отправка почты"

Сообщение от Satell (ok) on 15-Мрт-07, 20:06

почта не отправляется, ни через sendmail, ни через Net::SMTP на mail.ru, в чём проблема? мне нужно чтобы письмо выглядело, как будто отправлено из почтовой программы #!/usr/bin/perl open (SENDMAIL, "|/usr/sbin/sendmail -t") or die "sendmail not ready"; print SENDMAIL "From: John Doe <joe\@mail.ru>\n"; print SENDMAIL "To: Frank Smith <frank\@mail.ru\n"; print SENDMAIL "Reply-To: Frank Smith <frank\@mail.ru>\n"; print SENDMAIL "Subject: Test.\n\n"; print SENDMAIL "It's just test!!!"; close (SENDMAIL) or warn "sendmail didn't close nicely"; #!/usr/bin/perl use Net::SMTP; $smtp = Net::SMTP->new('smtp.mail.ru'); # Ваш сервер! $smtp->mail('joe@mail.ru'); $smtp->to('frank@mail.ru'); $smtp->data(); $smtp->datasend("To: frank@mail.run"); $smtp->datasend("n"); $smtp->datasend("Hello ADMIN!!!!!! :-)n"); $smtp->dataend(); $smtp->quit;

Высказать мнение | Ответить | Правка | Наверх | Cообщить модератору

Сообщения по теме

[Сортировка по времени, UBB]

1. "отправка почты"

Сообщение от anonymous (??) on 15-Мрт-07, 21:35

>почта не отправляется, ни через sendmail, ни через Net::SMTP на mail.ru, в >чём проблема? >мне нужно чтобы письмо выглядело, как будто отправлено из почтовой программы > >#!/usr/bin/perl >open (SENDMAIL, "|/usr/sbin/sendmail -t") or die "sendmail not ready"; >print SENDMAIL "From: John Doe <joe\@mail.ru>\n"; >print SENDMAIL "To: Frank Smith <frank\@mail.ru\n"; >print SENDMAIL "Reply-To: Frank Smith <frank\@mail.ru>\n"; >print SENDMAIL "Subject: Test.\n\n"; >print SENDMAIL "It's just test!!!"; >close (SENDMAIL) or warn "sendmail didn't close nicely"; > >#!/usr/bin/perl >use Net::SMTP; >$smtp = Net::SMTP->new('smtp.mail.ru'); # Ваш сервер! >$smtp->mail('joe@mail.ru'); >$smtp->to('frank@mail.ru'); >$smtp->data(); >$smtp->datasend("To: frank@mail.run"); >$smtp->datasend("n"); >$smtp->datasend("Hello ADMIN!!!!!! :-)n"); >$smtp->dataend(); >$smtp->quit; Пройди все эти шаги c помощью telnet smtp.mail.ru 25 .Работает?

Высказать мнение | Ответить | Правка | Наверх | Cообщить модератору

2. "отправка почты"

Сообщение от anonymous (??) on 15-Мрт-07, 21:40

>почта не отправляется, ни через sendmail, ни через Net::SMTP на mail.ru, в >чём проблема? >мне нужно чтобы письмо выглядело, как будто отправлено из почтовой программы > >#!/usr/bin/perl >open (SENDMAIL, "|/usr/sbin/sendmail -t") or die "sendmail not ready"; >print SENDMAIL "From: John Doe <joe\@mail.ru>\n"; >print SENDMAIL "To: Frank Smith <frank\@mail.ru\n"; >print SENDMAIL "Reply-To: Frank Smith <frank\@mail.ru>\n"; >print SENDMAIL "Subject: Test.\n\n"; >print SENDMAIL "It's just test!!!"; >close (SENDMAIL) or warn "sendmail didn't close nicely"; > >#!/usr/bin/perl >use Net::SMTP; >$smtp = Net::SMTP->new('smtp.mail.ru'); # Ваш сервер! >$smtp->mail('joe@mail.ru'); >$smtp->to('frank@mail.ru'); >$smtp->data(); >$smtp->datasend("To: frank@mail.run"); >$smtp->datasend("n"); >$smtp->datasend("Hello ADMIN!!!!!! :-)n"); >$smtp->dataend(); >$smtp->quit; У меня нет , потому что надо использовать порт 2525, т.е telnet smtp.mail.ru 2525

Высказать мнение | Ответить | Правка | Наверх | Cообщить модератору

Архив | Удалить	Индекс форумов | Темы | Пред. тема | След. тема
Оцените тред (1=ужас, 5=супер)? [ 1 | 2 | 3 | 4 | 5 ] [Рекомендовать для помещения в FAQ]