|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Nurlan Mukhanov 2:5020/400 14 Apr 2002 03:27:08 To : Denis Roshchin Subject : Re: Sendmail -------------------------------------------------------------------------------- Приветсвую тебя Denis Roshchin ! DR> может кто может скинуть маленький примерчик кода, DR> где посылается сообщение с Sendmail'a (в перле есс-но :))? DR> Искал - нигде ни смог найти :(( my $mailer=Mail::Mailer->new("sendmail"); $mailer->open( { 'From'=> "anketa\@otdyh.kz", 'To'=> "$email", 'Subject'=> "Пароль для редактирования анкеты в разделе \"Знакомства\"", 'Content-Type'=> "text/plain; charset=\"windows-1251\"" } ); print $mailer <<EOF; Здравствуйте! Это письмо было отправлено автоматически. Вами или кем-то другим был запрошен пароль для редактирования анкеты на сайте www.otdyh.kz в разделе "Знакомства"! Ваши данные: Email: $email Password: $passwd EOF --- ifmail v.2.15dev5 * Origin: Demos online service (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/7824b730ce39.html, оценка из 5, голосов 10
|