Perlでメール送信

Perlでメール送信するプログラムを書いたのでメモ。

メールを送信する方法はいくつかあるらしいが、

今回はNet::SMTPモジュールを使っている。

まずはコードの先頭で、Net::SMTPモジュールを使うことを宣言する。

メールを送信するには、以下のようにSMTPオブジェクトを生成して各データを渡すことで実現できる。

ここで注意しないといけないのが、文字コードらしい。

電子メールでよく使われる文字コードは「iso-2022-jp」みたいなので、コレにあわせる。

ヘッダーに関してはさらにややこしいらしく、BASE64というエンコード方法を使って、これらの文字をASCIIに変換し、ヘッダに埋め込む方法を規定しているらしい。

これでようやく文字化けさせずに送信できるみたいです。

エンコードのところはあってるのかわかりません。。。

参考

Pocket

Posted in Perl.