(add-filter-rule!
'(list-id
(#/<*([-.\w]+)\.([-\w]+)\.([-\w]+)\.([-\w]+)>*/ ".INBOX.l.\\4_\\3_\\2_\\1")
(#/<*([-.\w]+)\.([-\w]+)\.([-\w]+)>*/ ".INBOX.l.\\3_\\2_\\1"))
(add-filter-rule!
'(list-id
(#/<*([-.\w]+)\.([-\w]+)\.([-\w]+)\.([-\w]+)>*/ ".INBOX.l.\\4_\\3_\\2_\\1")
(#/<*([-.\w]+)\.([-\w]+)\.([-\w]+)>*/ ".INBOX.l.\\3_\\2_\\1"))