[Comm] Re[2]: [Comm] Шустро помощь нужна!

[Evgeny Yugov <yugov@scs-900.ru>]

Здравствуйте Artem,

Monday, June 9, 2003, 1:35:07 PM, you wrote:

AP> 9 Июнь 2003 08:15, Evgeny Yugov написал:> Здравствуйте All,>> Есть список email адресов в файле в столбик... есть тело> письма... нужно разослать всем юзверям из файла имеющееся тело> ;) В идеале
AP> в поле TO хорошо б ставить майл юзверя...>> ps Скриптами знаю что моня сделать... но думаю есть способ> намного проще.
AP> #!/usr/bi/perl
AP> $message="message.txt";
AP> open(MS , $message) || die " Can't open $message $!";
AP> @message=<MS>;
AP> close MS'while (<>){s/\n//;
AP> s/\r//;
AP> open (MAIL, "|/usr/bin/mail $_") || die "Can't run mail $!";
AP> print  MAIL @message;
AP> close MAIL;
AP> }
AP> Потом сохраняете файл, например как spamsend.pl   :)потом chmod +x spamsend.pl
AP> $ spamsend.pl < mails.txt
AP> Примерно так.
Сенк мыслю понял... но сделал ужо иначе чуток ;o)

-- 
With Best regards,
Evgeny Yugov,
MTS, programmer of Advanced Technologies Departament.
Registered Linux User #316667
mailto:yugov@scs-900.ru

Origin: Хоpошая кpыша слетает сама...