Модераторы: korob2001, ginnie
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> sendmail, Не знаю как оправить письмо. 
:(
    Опции темы
r
Дата 1.5.2005, 09:15 (ссылка)    |    (голосов: 0) Загрузка ... Загрузка ... Быстрая цитата Цитата


Unregistered











Заполучил хостинг, и вот возникла необходимость отправить кому-нибудь письмо smile , знаю только что sendmail лежит тут /usr/sbin/sendmail. Как нормальные люди, с помощью скрипта отсылают письма?
Спасибо.
  Вверх
korob2001
Дата 1.5.2005, 09:31 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Комодератор
Сообщений: 2871
Регистрация: 29.12.2002

Репутация: 13
Всего: 61



Почитай этот топик:
http://forum.vingrad.ru/index.php?showtopic=48419
там очень подробно описано, как отправлять письма с помощью sendmail

ЗЫ: на вопрос по кодировке, я отвечу сегодня вечером, ко мне сын в гости пришёл. smile

Это сообщение отредактировал(а) korob2001 - 1.5.2005, 09:44


--------------------
"Время проходит", - привыкли говорить вы по неверному пониманию. 
"Время стоит - проходите вы".
PM MAIL WWW ICQ MSN   Вверх
r
Дата 2.5.2005, 22:48 (ссылка)    |    (голосов: 0) Загрузка ... Загрузка ... Быстрая цитата Цитата


Unregistered











Извини, ничего существенного что могло-бы помочь не обнаружил.
  Вверх
Vaneska
Дата 3.5.2005, 09:08 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 141
Регистрация: 15.3.2005
Где: Москва

Репутация: 1
Всего: 4



Я отправляю так:
Код

sub EmailSend(){
  my($to, $from, $subj, $mess, $bcopy)=@_;

  open (MAIL, "|$file_sendmail -t -oi -odq");
  print MAIL "From: $from\n";
  print MAIL "To: $to\n";
  if ($bcopy ne ""){
    print MAIL "BCC: $bcopy\n";
  }
  print MAIL "Subject: $subj\n";
  print MAIL "Content-Type: text\/pain\n";
  print MAIL "\tCharset=\"windows-1251\"\n";
  print MAIL "\n";
  print MAIL "$mess\n";
  close(MAIL);
}

$file_sendmail - путь к sendmail (/usr/sbin/sendmail)
--------------------
http://isokolov.blogspot.com/
PM MAIL ICQ   Вверх
korob2001
Дата 3.5.2005, 16:12 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Комодератор
Сообщений: 2871
Регистрация: 29.12.2002

Репутация: 13
Всего: 61



Цитата

Извини, ничего существенного что могло-бы помочь не обнаружил.

Почитай все страницы темы, их там помоему 3


--------------------
"Время проходит", - привыкли говорить вы по неверному пониманию. 
"Время стоит - проходите вы".
PM MAIL WWW ICQ MSN   Вверх
Sadok
Дата 4.5.2005, 08:49 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 74
Регистрация: 2.11.2004

Репутация: 1
Всего: 2



Цитата
Как нормальные люди, с помощью скрипта отсылают письма?


Код

use strict;
use Net::SMTP;
use MIME::QuotedPrint;
my $subject = "=?windows-1251?Q?".encode_qp("тема тоже на русском")."?=";

my $smtp = Net::SMTP -> new('192.168.4.4',
                           Hello => 'comp.domain.ru',
                           Debug => 1);

# 192.168.4.4 - адрес почтового сервака в локалке
# comp.domain.ru - имя машиниы, с которой посылаем
# в принципе, важен только адрес сервера
    
$smtp->mail('[email protected]');
$smtp->to('[email protected]');

#В этих 2-х строках общаемся с сервером

$smtp->data();

# начали передачу сообщения

$smtp->datasend("From: Perl <perl\@domain\.ru>\n");
$smtp->datasend("To: Dima <ivan\@mail\.com>\n");
$smtp->datasend("Subject: $subject\n");
$smtp->datasend("Content-Type: text/plain; charset=windows-1251\n");
$smtp->datasend("Content-Transfer-Encoding: quoted-printable\n\n");

#Закончили формировать заголовки

$smtp->datasend("Проверошное сообщение на русском
и с переводами строк");

# Закончили тело письма

$smtp->dataend();

#Закончили письмо

$smtp->quit;

#Отлогинились


Вобщем, use Net::SMTP
PM   Вверх
r
Дата 6.5.2005, 22:09 (ссылка)    |    (голосов: 0) Загрузка ... Загрузка ... Быстрая цитата Цитата


Unregistered











Всем спасибо, существенно помогли, Vaneska получается что потом надо вызвать эту функцию с параметрами примерно так?
Код

EmailSend($to, $from, $subj, $mess, $bcopy);

Заранее благодарю.

  Вверх
korob2001
Дата 7.5.2005, 04:02 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Комодератор
Сообщений: 2871
Регистрация: 29.12.2002

Репутация: 13
Всего: 61



Цитата

Всем спасибо, существенно помогли, Vaneska получается что потом надо вызвать эту функцию с параметрами примерно так?

r - ДА, так же в начале скрипта нужно инициализировать переменную $file_sendmail, в ней должен быть указан путь к sendmail, как правило /usr/sbin/sendmail, но может быть и другим.

Удачи.

Это сообщение отредактировал(а) korob2001 - 7.5.2005, 04:06


--------------------
"Время проходит", - привыкли говорить вы по неверному пониманию. 
"Время стоит - проходите вы".
PM MAIL WWW ICQ MSN   Вверх
Vaneska
Дата 10.5.2005, 17:36 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 141
Регистрация: 15.3.2005
Где: Москва

Репутация: 1
Всего: 4



За меня korob2001 ответил. Ему спасибо.. smile
--------------------
http://isokolov.blogspot.com/
PM MAIL ICQ   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Perl: CGI программирование"
korob2001
sharq
  • В этом разделе обсуждаются вопросы относящиеся только к CGI программированию
  • Если ваш вопрос не относится к системному или CGI программированию, задавайте его в общем разделе
  • Если ваш вопрос относится к системному программированию, задавайте его здесь
  • Интерпретатор Perl можно скачать здесь ActiveState, O'REILLY, The source for Perl
  • Справочное руководство "Установка perl-модулей", качать здесь


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, korob2001, sharq.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Perl: разработка для Web | Следующая тема »


 




[ Время генерации скрипта: 0.0482 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.