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

[Yaroslav]

если отправлять почту стандартным способом

Код: [Выделить]


 open (MAIL, "|/usr/sbin/sendmail -t -f");
 print MAIL "$text";

при этом если юзер вводит сообщение где в строке только 1 точка

Здрасте
.
перезвоните

я понимаю что это бредово выглядит, но все же.
по почте доходит только

Здрасте
.

как это исправить?

[arto]

Здрасте
..
перезвоните

[arto]

да и вообще, как оно работает?

# sendmail -t -f
sendmail: option requires an argument -- f
#

[Yaroslav]

arto:
# sendmail -t -f
sendmail: option requires an argument -- f
#

там мыло добавлять надо
sendmail -t -f $mymail

[arto]

open (MAIL, "|/usr/sbin/sendmail -t -f");

и где там "мыло"?

[Yaroslav]

упусил что не загаживать лишними переменными код.
как окозалось есть те кто это не понял.

[Yaroslav]

по существу будут ответы?
или проверять посторчно на наличие точки?

[arto]

а чем вам не понравился первый ответ?
и что означает "построчно" ?

[arto]

можно использовать -i, но это, afaik, непереносимо

[Yaroslav]

arto:
а чем вам не понравился первый ответ?

сообщение набираю не я, а юзер.
вот юзеру хочеться пиать только 1 точку в строке.
построчно - это так

Код: [Выделить]

foreach (split /\\n/, $text) { print $_; }

[arto]

зачем так сложно?

s#^\\.$#..#gm

[Yaroslav]

arto:
s#^\\.$#..#gm

действительно, не подумал.
но все же, это единственный способ?

[arto]

arto:
можно использовать -i, но это, afaik, непереносимо

[APL]

Код: [Выделить]

open MAIL, \'|/usr/sbin/sendmail -t\' || die \'error sending message\';
print MAIL "From: from\\@mail.ru\\n";
print MAIL "To: to\\@mail.ru\\n";
print MAIL "Content-Type: text\\/plain\\n";
print MAIL "Subject: Тема письма\\n\\n";
print MAIL "Само письмо (никаких проблем с точками у меня никогда не было)\\n\\n";
close MAIL;


[arto]

а и попробуйте!
и cat /dev/null | sendmail -d0.1 покажите