|
|
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
|