[REBOL] Is it possible to recieve part of an email?

> From: [EMAIL PROTECTED]
> Date: Thu, 21 Oct 1999 1:07:22 +0100

> I am working on a script to give me a list of emails above a given size,
> and give me an option to delete without retrieving.

To kickstart you, here is a script I've done when starting to learn REBOL (you must 
change it, but it works right now)

--start-of-script--
REBOL [
    Title: "POP3 LIST command"
    File: %emailsize.r
    Author: "Daniele Forsi"
    Date: 22-Aug-1999/17:40:32+1:00
    Email: [EMAIL PROTECTED]
    Purpose: "Show size of every email in a mailbox"
    Comment: "No error checking is done to keep it simple"
]

user: ask "user? "
pass: ask/hide "password? "
host: ask "host? "

pop-port: open/lines join tcp:// [ host ":110" ]

    insert pop-port reform [ "USER" user ]
    insert pop-port reform [ "PASS" pass ]
    insert pop-port "LIST"

    while [ line: pick pop-port 1 ] [
        print line
        if line = "." [ break ]
    ]

    insert pop-port "QUIT"

close pop-port
;eof
--end-of-script--

> Idealy some part of the actual message should also be read for inspection.

You've seen the answer by Allen K about TOP -- you could use the script above for it.
If you think I can help feel free to email me, even off-list.

Ciao,
Daniele.

Reply via email to