powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / PHP, Perl, Python [игнор отключен] [закрыт для гостей] / Perl, Mail::Sender, аттач из переменной
4 сообщений из 4, страница 1 из 1
Perl, Mail::Sender, аттач из переменной
    #38903231
White Owl
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Нужно послать письмо с прикрепленным файлом. Проблема в том, что содержимое этого прикрепленного файла у меня в памяти, в виде строки имеется.
У Mail::Sender я вижу как задать какой файл с диска прочитать для прикрепления, но если файла на диске нет?
...
Рейтинг: 0 / 0
Perl, Mail::Sender, аттач из переменной
    #38903248
Фотография ScareCrow
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
...
Рейтинг: 0 / 0
Perl, Mail::Sender, аттач из переменной
    #38904658
White Owl
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Спасибо, но.... Опять уперся в нестандартность модуля. Надо идти на поклон к админам, чтобы добавляли... Скучно и грустно.
Но понял куда копать и накопал это:

Код: perl
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
my ($from, $to, $subject) = (.....);
my $contents = ......

my $mail = <<EOT;
From: $from
To: $to
Subject: $subject
Hello,
This your new data.
DO NOT REPLY!

begin 644 data.csv
EOT

$mail .= pack 'u', $contents;
$mail .= "`\nend\n";

open F, " |sendmail -t" or die;
print F $mail;
close F;


И вообще никаких модулей не надо. Был бы sendmail в системе.
...
Рейтинг: 0 / 0
Perl, Mail::Sender, аттач из переменной
    #38905595
Фотография Warstone
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
White OwlСпасибо, но.... Опять уперся в нестандартность модуля. Надо идти на поклон к админам, чтобы добавляли... Скучно и грустно.Вы-же на Перле пишете... В хомяке себе соберите и вперед. А вообще Перл без модулей - все равно что... C# без System'а.
...
Рейтинг: 0 / 0
4 сообщений из 4, страница 1 из 1
Форумы / PHP, Perl, Python [игнор отключен] [закрыт для гостей] / Perl, Mail::Sender, аттач из переменной
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]