|
ru.cgi.perl- RU.CGI.PERL ------------------------------------------------------------------ From : Mihail Zolotov 2:5020/400 12 Aug 2000 14:19:11 To : All Subject : subscribe -------------------------------------------------------------------------------- В общем прикол есть такая скрипта у меня называеться news.pl Выполняет она автоматическую рассылку новостей (автоматика прописана в кроне) в общем все нормально если бы не одна вешчь.... После выполнения срипта сообщения висят в воздухе с mailq валит столько сообщений что жуть .... и все висят долго и нудно ... до сих пор..... отсылка производиться вот этой подпрограммкой: sub send_mail { open(MAIL,"|$mailprog -t"); print MAIL "To: $recipient\n"; print MAIL "From: $sender ($realname)\n"; print MAIL "Subject: $subject\n\n"; print MAIL "@header \n\n"; for ($k = 0; $k <= $#newsout; $k++) $newsout = $newsout[$k]; write (MAIL); } print MAIL @footer; close(MAIL); } Интересно что я тут мог напортачить? ___________________________________________________________ Mihail Zolotov programmer Perl PHP primary E-mail: remember@chip.com.ua URL:http://www.itware.com.ua secondary E-mail: naibi@mail.ru URL:http://www.rem.al.ru ICQ#55886367 ***origin: ... and court for all world !!! --- ifmail v.2.15dev5 * Origin: 'Relcom Ukraine (tm) ISP' (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.cgi.perl/129882aec213f.html, оценка из 5, голосов 10
|