本工具利用了 fayland 的模块来连接 gmail 发送邮件,并结合 blogger 的邮件自动发送功能实现 blog 的发送。使用的模块主要是 Email::Send SMTP::TLS Email::MIME::Creator。
使用 bash function 写的一个快速胶水程序,用来调用 perl 程序。
ms () { perl ~/bin/gm $* }主要的程序就是 gm,其中主要的逻辑就是调用 Email::MIME::Creator 构造 utf8 编码的 HTML 附件(由 join "",<STDIN> 从标准输入读入正文),然后用 fayland 的 SMTP::TLS 发送。
1 条评论:
挺不错的呀。
发表评论