[Gauche] SMTPクライアントライブラリ - SumiTomohiko's blogSMTPのクライアントを作成してみました。といっても、単にサーバに接続してコマンドを送っているだけです。エンコードなどは行いません。 #! gosh ;; -*- coding: utf-8 -*- (use gauche.net) (define (gsmtp-sendmail host port from to body verbose) (let* ( (sock (make-client-socket 'inet host port)) (input-port (socket-input-port sock)) (output-port (socket-output-port sock))) (define (display-log s) (if (equal? verbose #t) (display s) #t)) (define (receive-response) (let
![[Gauche] SMTPクライアントライブラリ - SumiTomohiko's blog](https://cdn-ak-scissors.b.st-hatena.com/image/square/d888cb12a0e92580231cb3acb16ff34e2f02eebc/height=288;version=1;width=512/https%3A%2F%2Fogimage.blog.st-hatena.com%2F11696248318756227478%2F11696248318756227812%2F1375071523)
