Warning, /pim/libksieve/src/ksieveui/autocreatescripts/autotests/data/test-current-date-custom-ref.siv is written in an unsupported language. File is not indexed.

0001 require "date";
0002 require "variables";
0003 require "fileinto";
0004 require "mailbox";
0005 
0006 # rule:[Script part 0]
0007 # Extract date info
0008 if currentdate :matches "year" "*"
0009 {
0010     set "year" "${1}";
0011 } 
0012 
0013 # rule:[Script part 1]
0014 if currentdate :matches "month" "*"
0015 {
0016     set "month" "${1}";
0017 } 
0018 
0019 # rule:[Script part 2]
0020 # Archive Dovecot mailing list items by year and month.
0021 # Create folder when it does not exist.
0022 if header :is "list-id" "dovecot.dovecot.org"
0023 {
0024     fileinto :create "INBOX.Lists.${year}.${month}.dovecot";
0025 }