Перл и почта

Все, что вы хотели знать о программизме, но боялись спросить.
Ответить
Аватара пользователя
Seaman
Пользователь
Сообщения: 197
Зарегистрирован: 21 фев 2003, 13:26
Откуда: Ессентуки-Нврск-СПб-Торонто

Перл и почта

Сообщение Seaman »

Переехали в Линуха на NT Сервер, здесь же стоит почтовый сервер налаженный на mail.domain.com.
Для посылки простых текстовых сообщений нет проблем с использованием Net::SMTP, как

Код: Выделить всё

my $smtp = Net::SMTP->new('mail.domain.com');
Но надо посылать еще и attachments с картинками.
В Линухе пользовались Mime::Entity, как

Код: Выделить всё

foreach my $img (@img) {
   $top->attach(Path => "$IMG_DIR/$img",
                Type => "image/jpeg",
                Encoding => "base64") or return "Error: $!";
}
open (MAIL, "| /usr/sbin/sendmail -t -i") or return "Could not send mail: $!";
$top->print(\*MAIL);
close MAIL;
Можно-ли посылать картинки с Net::SMTP (не могу найти как их туда присобачить)?
Можно-ли наладить Mime::Entity, что бы работал с NT почтовым сервером (что надо указать в 'open (MAIL, ...)', простой зов сервера ничего не дает)?
Или нужно для таких дел использовать что-то еще? Что рекомендуете, господа?

Заранее спасибо.
Аватара пользователя
папа Карло
Шарманщик
Сообщения: 8563
Зарегистрирован: 17 фев 2003, 15:04
Откуда: НН -> BC -> WA -> UT -> CA

Сообщение папа Карло »

глупость спрошу: зачем если работало переехали? :) опятьже НТ денег стоит :)
Аватара пользователя
Seaman
Пользователь
Сообщения: 197
Зарегистрирован: 21 фев 2003, 13:26
Откуда: Ессентуки-Нврск-СПб-Торонто

Сообщение Seaman »

В общем-то не глупость. Отвечаю честно.
Во-первых, отказались от хост провайдера - своих клиентов стали обслуживать сами.
Во-вторых, не смогли пока установить Оракла на Линухе - не хватило опыта. (Я единственный, кто в нем хоть чуть-чуть рубит, а у меня за плечами 20 лет мореплаваний, а с компьютерной техникой я только 2 года назад на "курсах красных командиров" познакомился.)
В-третьих, мигририровать Оракла по одной платформе легче, поскольку тут еще LYRIS дурацкий завязан.
Ну и еще есть несколько причин ...
Аватара пользователя
папа Карло
Шарманщик
Сообщения: 8563
Зарегистрирован: 17 фев 2003, 15:04
Откуда: НН -> BC -> WA -> UT -> CA

Сообщение папа Карло »

нда.... .как все запущено :)

use MIME::Lite;
use Net::SMTP;

лайт если не установлен, то.....

Код: Выделить всё

C:\Perl\bin\ppm.bat
ppm> install MIME-Lite
ppm> quit
Аватара пользователя
Seaman
Пользователь
Сообщения: 197
Зарегистрирован: 21 фев 2003, 13:26
Откуда: Ессентуки-Нврск-СПб-Торонто

Сообщение Seaman »

О.К. спасибо, завтра на работе попробую Лайт. Он у меня установлен, но пользоваться им я еще не учился. :? Нашел сейчас статейку в CPAN-e по нему. :wink:
Ответить