suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Initial revision

Browse Source 
original commit: a75c6730f33f736f58191f69f33fdbcb576cdcf5
This commit is contained in:
Shriram Krishnamurthi 1997-11-06 18:49:45 +00:00
parent 598a4a009a
commit 37d20338bd
1 changed files with 28 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

28
collects/net/pop3.ss Normal file
View File

@ -0,0 +1,28 @@
(reference-library "pop3u.ss" "net")
(invoke-open-unit/sig mzlib:pop3@ pop3)
#|
> (reference-library "pop3.ss" "net")
> (define c (pop3:connect-to-server "cs.rice.edu"))
> (pop3:authenticate/plain-text "scheme" "********" c)
> (pop3:get-mailbox-status c)
100
177824
> (pop3:get-message/headers c 100)
("Date: Thu, 6 Nov 1997 12:34:18 -0600 (CST)"
"Message-Id: <199711061834.MAA11961@new-world.cs.rice.edu>"
"From: Shriram Krishnamurthi <shriram@cs.rice.edu>"
...
"Status: RO")
> (pop3:get-message/complete c 100)
("Date: Thu, 6 Nov 1997 12:34:18 -0600 (CST)"
"Message-Id: <199711061834.MAA11961@new-world.cs.rice.edu>"
"From: Shriram Krishnamurthi <shriram@cs.rice.edu>"
...
"Status: RO")
("some body" "text" "goes" "." "here" "." "")
> (pop3:disconnect-from-server c)
|#