VPF::sendmail - Форум программистов

GShadrin

Дата 31.7.2009, 16:06 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

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

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

Здравствуйте
Пытаюсь отправить письмо с сервера, используя sendmail:

Код


#!/usr/bin/perl
use CGI qw(:standard);
print "Content-type: text/plain\n\n";
$loginreg=param('loginreg');
$loginreg2=param('loginreg2');
$namereg=param('namereg');
$mailreg=param('mailreg');
$passreg=param('passreg');
$pass2reg=param('pass2reg');
$checkbox=param('checkbox');
#генерируем код
$code='';
for ($i=0; $i<50; $i++)
{
    $code.=chr(rand(200));
}
#отправка письма
open (SND,"|/usr/sbin/sendmail -t");
print SND "To: $mailregn";
print SND "From: [email protected]";
print SND "Subject: abcdnn";
print SND "abcd\n123456\n abcn";
close SND;

Письмо не приходит.
На сервере есть sendmail - точно, путь к нему указан верно.
Почему?
Я что то делаю не правильно?

Это сообщение отредактировал(а) GShadrin - 31.7.2009, 16:16

KSURi

Дата 31.7.2009, 17:09 (ссылка)

(нет голосов)

Загрузка ...

Опытный

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

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

добавьте use strict и увидите ошибку

--------------------

Died at Life.pl line 21

GShadrin

Дата 31.7.2009, 17:46 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

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

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

изменил на

Код


open (SND,"|/usr/sbin/sendmail -t");
print SND "To: $mailreg\n";
print SND "From: abcd\@yandex.ru\n";
print SND "Content-Type: text/plain; charset=windows-1251\n";
print SND "Subject: abcd\n\n";
print SND "abcd\n123456\n abc\n";
close SND;

странно здесь писали вместо \n просто n http://webmastak.com/article.aspx?id=261
отправляет, но русский текст со сбитой кодировкой

Добавлено через 9 минут и 18 секунд
нашел где почитать

Это сообщение отредактировал(а) GShadrin - 31.7.2009, 17:52

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