|
ru.linux
- RU.LINUX ---------------------------------------------------------------------
From : Alexey Wasilyev 2:5053/40.1 19 Sep 2001 13:50:00
To : Vsevolod Lutovinov
Subject : uucp + drweb
--------------------------------------------------------------------------------
ю Ответ на письмо из арии message.to.alexey (message.to.alexey)
ю Доброго здоровья тебе, Vsevolod!
ю Писал как-то Vsevolod Lutovinov к Alexey Wasilyev
ю Про "uucp + drweb"
[...]
VL> Самый простой вариант. Это самое нечто сначала скармливает
VL> почту drwebdc или демону/сканеру в общем случае, если что-то
VL> не так - отсылает уведомления, прибивает файлы и т.д., выжившее
VL> отдает оригинальному rmail. Подозреваю, что 99% для создания
VL> этого нечта есть где-нибудь в окрестностях www.cpan.org :)
А если так:
=== Hачало Windows Clipboard ===
#!/usr/bin/perl -w
use Net::SMTP;
@msg = <STDIN>; # Slurp up the message.
if (open(TMP,">/tmp/mail/Msg$$")) {
print TMP @msg;
close TMP;
}
$msg[0] =~ m/^From\s(\S+)/;
$from=$1;
$smtp = Net::SMTP->new('mail.ogd.saratov.ru',
Hello => 'ogd.saratov.ru',
Timeout => 30
);
$smtp->mail($from);
$smtp->to($ARGV[0]);
$smtp->data(@msg);
$smtp->quit;
=== Конец Windows Clipboard ===
ю С наилучшими пожеланиями, Alexey alexey at ogd.saratov.ru
[Team Выспаться!]
--- Dreaming about mgetty/w32...
* Origin: ДАО 'Оргэнергогаз', ИТЦ 'Орггаздефектоскопия' (2:5053/40.1)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
