Как сортировать почту на сервере не почтовым клиентом?

-- --------------------------------------------
-- functions
-- --------------------------------------------

dailyseen = function(account, starting, days)
        markitseen = account[starting]:is_unseen() *
                account[starting]:is_older(days)
        account[starting]:mark_seen(markitseen)

        folders = account:list_all(starting)
        for _, folder in ipairs(folders) do
                dailyseen(account, folder, days)
        end
end

dailyexpire = function(account, starting, days)
        markittrash = account[starting]:is_older(days)
        account[starting]:mark_deleted(markittrash)

        folders = account:list_all(starting)
        for _, folder in ipairs(folders) do
                dailyexpire(account, folder, days)
        end
end

cert = account1.INBOX:contain_from('@us-cert.gov') *
          account1.INBOX:contain_to('@us-cert.gov')
account1.INBOX:move_messages(account1['Info/cert'], cert)

ym = account1.INBOX:contain_from('inform@money.yandex.ru') *
         account1.INBOX:contain_to('account@ya.ru')
account1.INBOX:move_messages(account1['Info/yandex'], ym)

ym = account1.INBOX:contain_from('hello@money.yandex.ru') *
        account1.INBOX:contain_to('account@ya.ru')
account1.INBOX:move_messages(account1['Info/yandex'], ym)

apple = account1.INBOX:contain_from('@itunes.com') *
             account1.INBOX:contain_to('account@ya.ru')
account1.INBOX:move_messages(account1['Info/apple'], apple)

apple = account1.INBOX:contain_from('@apple.com') *
             account1.INBOX:contain_to('account@ya.ru')
account1.INBOX:move_messages(account1['Info/apple'], apple)

ripe = account2.INBOX:contain_from('unread@ripe.net') *
          account2.INBOX:contain_to('account@ya.ru')
account2.INBOX:move_messages(account2['data/05-ripe'], ripe)

snr = account2.INBOX:contain_from('@nag.ru') *
        account2.INBOX:contain_to('account@ya.ru')
account2.INBOX:move_messages(account2['data/90-snr'], snr)

dailyexpire(account2, 'Junk', 10)