servers/mermet/dovecot/sieve/global/list.sieve

   1 require [ "date", "fileinto", "mailbox", "variables" ];
   2
   3 if currentdate :matches "year"  "*" { set "year"  "${1}"; }
   4 if currentdate :matches "month" "*" { set "month" "${1}"; }
   5
   6 if exists "List-ID" {
   7   if header :matches "List-ID" "*<*.*.*.*>*" {
   8     set "list"   "${2}";
   9     set "domain" "${4}";
  10   }
  11   elsif header :matches "List-ID" "*<*.*.*>*" {
  12     set "list"   "${2}";
  13     set "domain" "${3}";
  14   }
  15   fileinto :create "Listes+${domain}+${list}+${year}+${month}";
  16   stop;
  17 }