Handy Ruby script to empty IMAP mailbox

mailbox_cleaner.rb

#!/usr/bin/env ruby

MAILBOXES = ['INBOX', 'Deleted Items']
SERVER = 'server'
USERNAME = 'username'
PASSWORD = 'password'

require 'net/imap'

imap = Net::IMAP.new(SERVER)
imap.login(USERNAME, PASSWORD)

MAILBOXES.each do |mailbox|
  imap.select(mailbox)
  imap.uid_search('ALL').each_slice(200) {|uids| imap.uid_store(uids, "+FLAGS", [:Deleted]) }
  imap.expunge
  puts "Mailbox \"#{mailbox}\" is now empty."
end
imap.close