2008年12月26日星期五

pod2blogger

pod2blogger


POD2blogger

本工具利用了 fayland 的模块来连接 gmail 发送邮件,并结合 blogger 的邮件自动发送功能实现 blog 的发送。使用的模块主要是 Email::Send SMTP::TLS Email::MIME::Creator。

使用方法

cat sample.pod | pod2html | ms title joe.blogger@blogger.com

pod2html

可以使用标准的 pod2html 来发送,但是也可以用 Pod::DocBook 结合 xsltproc 来实现转换,后者更加灵活严谨。

ms

使用 bash function 写的一个快速胶水程序,用来调用 perl 程序。

ms () { perl ~/bin/gm $* }

主要的程序就是 gm,其中主要的逻辑就是调用 Email::MIME::Creator 构造 utf8 编码的 HTML 附件(由 join "",<STDIN> 从标准输入读入正文),然后用 fayland 的 SMTP::TLS 发送。

hacks

发现 Email::MIME::ContentType 里面有硬编码的 US-ascii 字符集,改变成硬编码的 utf8 之后问题解决。

1 条评论: