[Comm] Re[2]: [Comm] Шустро помощь нужна!
Evgeny Yugov
=?iso-8859-1?q?yugov_=CE=C1_scs-900=2Eru?=
Пн Июн 9 10:58:16 MSD 2003
Здравствуйте 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ыша слетает сама...
Подробная информация о списке рассылки community