Как сделать массовую рассылку по электронной почте?
Это очень просто! Ниже приведены несколько шагов для этого:
- Шаг 1. Подготовить текст в кодировке koi8-r (+обычно в конце файла добавляется еще текст с транслитерацией). Например название файла message.txt
- Шаг 2. Подготовить список почтовых адресов в файле addr.dat
- Шаг 3. Зайти на сервер отдела неа используя SSH.
- Шаг 4. Создать директорию (для удобства), например BulkMail2009 и скопировать туда приготовленные файлы.
- Шаг 5. Скопировать в эту же папку файл /etc/Bulkmail/send_message.pl и отредактировать шапку этого файла. Файл должен выглядеть таким образом как показано ниже.
- Шаг 6. Тестирование. Сделайте файл test.dat со своим адресом электронной почты и впишите его в скрипт в поле
$addresses = './addr.dat';.
- Шаг 7. Запустите скрипт командой perl send_message.pl. Проверьте все поля, заголовки пришедшего письма.
- Шаг 8. Если все отображается нормально, и поля в порядке, замените в скрипте тестовый файл с адресами на боевой и запускайте скрипт.
#!/usr/bin/perl
use Mail::Bulkmail;
$subject = "HEA Information Letter";
$message = `cat message.txt`;
$addresses = './addr.dat';
$goodfile = './maillist.good';
$badfile = './maillist.bad';
$from='hea2009@iki.rssi.ru';
$reply_to='hea2009@iki.rssi.ru';
$errors_to='hea2009@iki.rssi.ru';
|