#!/usr/bin/expect -f
set timeout 3
spawn telnet localhost 143
expect "CAPABILITY"
send "a001 LOGIN person@ourdomain.com PersonsPassw0rdn"
expect "Logged"
send "a002 SELECT INBOXn"
expect "completed"
send "a003 LOGOUTn"
expect "BYE"

#!/bin/bash
cd `dirname $0`
while [ 1 ]; do
    date +'%Y-%m-%d %H:%M:%S'
    ./loginimap
    sleep 14
    echo
done

2017-07-05 17:07:48
spawn telnet localhost 143^M
Trying ::1...^M^M
Connected to localhost.^M^M
Escape character is '^]'.^M^M
* OK [CAPABILITY IMAP4rev1 LITERAL+ SASL-IR LOGIN-REFERRALS ID ENABLE IDLE STARTTLS AUTH=PLAIN] Dovecot ready.^M
a001 LOGIN person@ourdomain.com PersonsPassw0rd^M
a001 OK [CAPABILITY IMAP4rev1 LITERAL+ SASL-IR LOGIN-REFERRALS ID ENABLE IDLE SORT SORT=DISPLAY THREAD=REFERENCES THREAD=REFS THREAD=ORDEREDSUBJECT MULTIAPPEND URL-PARTIAL CATENATE UNSELECT CHILDREN NAMESPACE UIDPLUS LIST-EXTENDED I18NLEVEL=1 CONDSTORE QRESYNC ESEARCH ESORT SEARCHRES WITHIN CONTEXT=SEARCH LIST-STATUS SPECIAL-USE BINARY MOVE] Logged in^M
a002 SELECT INBOX^M
* FLAGS (Answered Flagged Deleted Seen Draft $Forwarded)^M
* OK [PERMANENTFLAGS (Answered Flagged Deleted Seen Draft $Forwarded *)] Flags permitted.^M
* 0 EXISTS^M
* 0 RECENT^M
* OK [UIDVALIDITY 1495116596] UIDs valid^M
* OK [UIDNEXT 1573] Predicted next UID^M
* OK [HIGHESTMODSEQ 11274] Highest^M
a002 OK [READ-WRITE] Select completed (0.000 secs).^M
a003 LOGOUT^M
* BYE Logging out^M
a003 OK Logout completed.^M

2017-07-05 17:08:03
spawn telnet localhost 143^M
Trying ::1...^M^M
Connected to localhost.^M^M
Escape character is '^]'.^M^M
Connection closed by foreign host.^M^M
send: spawn id exp5 not open
    while executing
"send "a001 LOGIN person@ourdomain.com PersonsPassw0rdn""
    (file "./loginimap" line 5)^M

2017-07-05 17:08:18
spawn telnet localhost 143^M
Trying ::1...^M^M
Connected to localhost.^M^M
Escape character is '^]'.^M^M
a001 LOGIN person@ourdomain.com PersonsPassw0rd^M
* OK [CAPABILITY IMAP4rev1 LITERAL+ SASL-IR LOGIN-REFERRALS ID ENABLE IDLE STARTTLS AUTH=PLAIN] Dovecot ready.^M
a001 OK [CAPABILITY IMAP4rev1 LITERAL+ SASL-IR LOGIN-REFERRALS ID ENABLE IDLE SORT SORT=DISPLAY THREAD=REFERENCES THREAD=REFS THREAD=ORDEREDSUBJECT MULTIAPPEND URL-PARTIAL CATENATE UNSELECT CHILDREN NAMESPACE UIDPLUS LIST-EXTENDED I18NLEVEL=1 CONDSTORE QRESYNC ESEARCH ESORT SEARCHRES WITHIN CONTEXT=SEARCH LIST-STATUS SPECIAL-USE BINARY MOVE] Logged in^M
a002 SELECT INBOX^M
* FLAGS (Answered Flagged Deleted Seen Draft $Forwarded)^M
* OK [PERMANENTFLAGS (Answered Flagged Deleted Seen Draft $Forwarded *)] Flags permitted.^M
* 0 EXISTS^M
* 0 RECENT^M
* OK [UIDVALIDITY 1495116596] UIDs valid^M
* OK [UIDNEXT 1573] Predicted next UID^M
* OK [HIGHESTMODSEQ 11274] Highest^M
a002 OK [READ-WRITE] Select completed (0.000 secs).^M
a003 LOGOUT^M
* BYE Logging out^M
a003 OK Logout completed.^M

2017-07-05 17:08:37
spawn telnet localhost 143^M
Trying ::1...^M^M
Connected to localhost.^M^M
Escape character is '^]'.^M^M
a001 LOGIN person@ourdomain.com PersonsPassw0rd^M
Connection closed by foreign host.^M^M
send: spawn id exp5 not open
    while executing
"send "a002 SELECT INBOXn""
    (file "./loginimap" line 7)^M

2017-07-05 17:08:57
spawn telnet localhost 143^M
Trying ::1...^M^M
Connected to localhost.^M^M
Escape character is '^]'.^M^M
a001 LOGIN person@ourdomain.com PersonsPassw0rd^M
a002 SELECT INBOX^M
* OK [CAPABILITY IMAP4rev1 LITERAL+ SASL-IR LOGIN-REFERRALS ID ENABLE IDLE STARTTLS AUTH=PLAIN] Dovecot ready.^M
a001 OK [CAPABILITY IMAP4rev1 LITERAL+ SASL-IR LOGIN-REFERRALS ID ENABLE IDLE SORT SORT=DISPLAY THREAD=REFERENCES THREAD=REFS THREAD=ORDEREDSUBJECT MULTIAPPEND URL-PARTIAL CATENATE UNSELECT CHILDREN NAMESPACE UIDPLUS LIST-EXTENDED I18NLEVEL=1 CONDSTORE QRESYNC ESEARCH ESORT SEARCHRES WITHIN CONTEXT=SEARCH LIST-STATUS SPECIAL-USE BINARY MOVE] Logged in^M
* FLAGS (Answered Flagged Deleted Seen Draft $Forwarded)^M
* OK [PERMANENTFLAGS (Answered Flagged Deleted Seen Draft $Forwarded *)] Flags permitted.^M
* 0 EXISTS^M
* 0 RECENT^M
* OK [UIDVALIDITY 1495116596] UIDs valid^M
* OK [UIDNEXT 1573] Predicted next UID^M
* OK [HIGHESTMODSEQ 11274] Highest^M
a002 OK [READ-WRITE] Select completed (0.000 secs).^M
a003 LOGOUT^M
* BYE Logging out^M
a003 OK Logout completed.^M