|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Bazil 2:5020/400 10 Jun 2002 21:19:59
To : Dmitry Koteroff
Subject : Re[2]: заглушка sendmail
--------------------------------------------------------------------------------
Приветствую Вас, Dmitry!
BB>>> А можно ли под винду сделать некий эмулятор-заглушку sendmail'a
DK> информация к размышлению. В Windows можно делать <perl-bat-файл>,
DK> вот так:
DK> Файл sendmail.bat:
DK> @echo off
DK> perl -x -S "%0" %1 %2 %3 %4 %5 %6 %7 %8 %9
DK> exit;
DK> #!z:/usr/bin/perl -w
DK> open(local *F, ">>>/tmp/mails.txt");
DK> binmode(F); binmode(STDIN);
DK> print F "Arguments: ".join(" ",@ARGV)."\r\n";
DK> while(defined(my $line=<STDIN>)) {
DK> prinf F $line;
DK> }
Интересная опция -x. А я сделал двумя файлами:
==== файл c:/usr/sbin/sendmail.bat: ===
@perl /usr/sbin/sendmail.pl
==== файл /usr/sbin/sendmail.pl: ======
#!/usr/local/bin/perl
open FILE, '>>/path/sendmail.log';
while( <STDIN> )
{
print FILE $_;
}
close FILE;
-----------------------------------------
Всего наилучшего,
Bazil
- --- Отправлено через сервер Форумы@mail.ru - http://talk.mail.ru
--- ifmail v.2.15dev5
* Origin: Talk.Mail.Ru (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
