retrieve ( message# -- seq )

Vocabulary

pop3

Inputs

message#

a fixnum

Outputs

seq	a sequence

Word description

Sends message number message# to you. You should prepare for some base64 decoding. You probably want to do this with a mailer.

Definition

USING: accessors io.streams.duplex kernel math.parser
pop3.private sequences ;

IN: pop3

: retrieve ( message# -- seq )
    [ stream ] dip [ [ "RETR " ] ] dip
    [ number>string append command readlns dup raw content<< ]
    curry compose with-stream* ;