ru.linux

 
 - RU.LINUX ---------------------------------------------------------------------
 From : Dmitry Ivanov                        2:5020/400     02 Oct 2003  18:20:43
 To : Jahor Miadzviedziew
 Subject : Re: mutt: как добавить фичи?
 -------------------------------------------------------------------------------- 
 

 В статье <1403774880@f217.n450.z2.ftn> Jahor Miadzviedziew написал(а):
 
 > при помощи патча уговорил mutt вместо удаления переносить мессаги в
 > специальный mbox. теперь хочется добавить мозгов этому mbox'у, чтобы
 > каждый месяц старый паковался gzip'ом (bzip2'ом?) и складывался с именем
 > вроде 2003-09-trash.[gz|bz2] туда же, в ~/Mail. ну и чтобы при большом
 
 А зачем всё это вешать на mutt? У меня просто procmail
 все письма складывает в архив по месяцам. Если будет
 мало места, повешу на cron скрипт, который будет ящики
 сжимать и делать ro.
 
 MAILDIR=Mail
 
 :0 Wic
 |/home/dimss/bin/stopexec.pl
 
 :0 e
 /dev/null
 
 :0 c :
 archive-`date +%Y%m`
 
 А чтобы всякая фигня в архив и ящики не сыпалась, применяю
 весёлый фильтр, который посылает в /dev/null все письма,
 содержащие MS-DOS executable.
 
 #!/usr/bin/perl
 
 umask(0077);
 my $TempDir = '/tmp/stopexec' . join(
         '',
         (0..9, 'A'..'Z', 'a'..'z')[
                 rand(62), rand(62), rand(62), rand(62), rand(62)
         ]
 );
 mkdir($TempDir) or die $!;
 chdir($TempDir) or die $!;
 open(MUNPACK, "| munpack -q") or die $!;
 while(<>){
         print MUNPACK $_;
 }
 close(MUNPACK);
 my $FileDescr = `file *`;
 if($FileDescr =~ /MS-DOS\ executable/){
         exit(1);
 }
 chdir('/');
 system("rm -rf $TempDir");
 exit(0);
 
 -- 
 D.I.M.S.S.: Digital Intelligent Machine Skilled in Sabotage
 
 Please avoid sending me Word or PowerPoint attachments.
 See http://www.fsf.org/philosophy/no-word-attachments.html
 --- ifmail v.2.15dev5
  * Origin: SIA Alkom (2:5020/400)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор