|
ru.cgi.perl
- RU.CGI.PERL ------------------------------------------------------------------
From : ЏҐва®ўЁз 2:5020/400 12 Apr 2001 21:22:27
To : All
Subject : Re: Форма по почте
--------------------------------------------------------------------------------
Я к Вам, профессор Andy! И вот по какому делу:
Hе так уж и давно Вы писали on Thu, 12 Apr 2001 14:47:53 +0000 (UTC):
$mailprog="/usr/lib/sendmail";
$to = $query->param('recipient');
$subject = $query->param('subject');
$text = $query->param('text');
$from = $query->param('from');
open(MAIL, "$mailprog -t") || die "Can't open $mailprog!\n";
print MAIL "To: $to\n";
print MAIL "From: $from\n";
print MAIL "Subject: $subject\n\n";
print MAIL "$text\n";
==========================================
Все _гораздо_ прозаичнее!!! Я как узнал - просто трещал и бил себя пяткой в
грудь!!!!
Это должно выглядеть так:
$mailprog="/usr/lib/sendmail";
$to = $query->param('recipient');
$subject = $query->param('subject');
$text = $query->param('text');
$from = $query->param('from');
open(MAIL, "|$mailprog -t") || die "Can't open $mailprog!\n";
print MAIL "To: $to\n";
print MAIL "From: $from\n";
print MAIL "Subject: $subject\n\n";
print MAIL "$text\n";
#ну и конечно... по заказу Artem Chuprina...
close MAIL;
# :))))))
===========================================
Hайдите отличие, господа... В общем поток данных надо было перенаправлять на
программулину $mailprog символом | !!!!! Вот так-то!!! В работе скрипта
можете убедится на сайте http://freesamples.takeinet.com/feedback.htm !!!!!
Сасибо за помощь... ;)
--
Re$pect
Петрович
-=[Team PPS] [Team WSL] [<http://www.perlyny.net>] [talk.ru.samples]
[<http://freesamples.takeinet.com>]=-
--- ifmail v.2.15dev5
* Origin: Donbass Internet Center DIPT (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
