(Ruby) POP3 to SMTP Forwarder

Read a POP3 mailbox and forwards the email to another email address, keeping the recipients in the original email the same.

Chilkat Ruby Downloads install from rubygems.org gem install chilkat or download... Ruby Library for Windows, MacOS, Linux, Alpine Linux

require 'chilkat'

# This example requires the Chilkat API to have been previously unlocked.
# See Global Unlock Sample for sample code.

mailman = Chilkat::CkMailMan.new()

# Set the POP3 server's hostname
mailman.put_MailHost("pop.example.com")

# Set the POP3 login/password.
mailman.put_PopUsername("MY_LOGIN")
mailman.put_PopPassword("MY_PASSWORD")

# The the UIDLs for all email in the POP3 mailbox.
# saUidls is a CkStringArray
saUidls = mailman.GetUidls()
if (mailman.get_LastMethodSuccess() == false)
    print mailman.lastErrorText() + "\n";
    exit
end

# Download the email from the server.  Call FetchMultipleMime
# because we don't want to load the emails into email objects.
# (We'll delete the emails that are forwarded without error.)
# Note: It is not reasonable to call this method for a mailbox containing
# a huge number of emails.  For large mailboxes, it's better to download
# one by one and process each email independently. This way, if a 
# server or communications error occurs, it's possible to write code
# that can resume.
# saMime is a CkStringArray
saMime = mailman.FetchMultipleMime(saUidls)

if (mailman.get_LastMethodSuccess() == false)

    print mailman.lastErrorText() + "\n";
    exit
end

# Set the SMTP hostname for sending.
mailman.put_SmtpHost("smtp.example.com")
mailman.put_SmtpUsername("MY_SMTP_LOGIN")
mailman.put_SmtpPassword("MY_SMTP_PASSWORD")

n = saMime.get_Count()

fromAddr = "me@example.com"
toAddr = "recipient@somewhere.com"

bAllOk = true

i = 0
while i < n

    strMime = saMime.getString(i)

    # Forward the email.
    success = mailman.SendMime(fromAddr,toAddr,strMime)
    if (success != true)
        bAllOk = false
        print mailman.lastErrorText() + "\n";
        # Force loop exit.
        i = n
    end

    i = i + 1
end

# Remove the emails in saUidls from the POP3 server.
if (bAllOk == true)
    success = mailman.DeleteMultiple(saUidls)
    if (success != true)
        print mailman.lastErrorText() + "\n";
    end

end

print "bAllOk = " + bAllOk.to_s() + "\n";