CGI プログラムからのメール送信 (2)

前項のスクリプトでは、メールヘッダ・サブジェクトに英数字しか使っていませんでした。では、日本語を扱う場合はどうすればいいのでしょうか。

まず本文ですが、これは簡単です。JIS コード (ISO-2022-JP) にしてから送信すればよいのです。nkf を使う例と jcode.pl を使う例、2通りの方法を紹介しておきます。

nkf の場合は、

open(SENDMAIL,"| nkf -j | sendmail ...");

と nkf の出力を sendmail に渡すようにします。このプログラムも CGI プログラムではないので、コマンドラインから実行して下さい。

mail-j-nkf.pl

    1: #!/usr/local/bin/perl
    2: 
    3: $sendmail = '/usr/sbin/sendmail';
    4: $nkf = '/usr/local/bin/nkf';
    5: 
    6: open(SENDMAIL,"| $nkf -j | $sendmail -t -i");
    7: 
    8: print SENDMAIL <<'END';
    9: From: from@foo.bar.com
   10: To: to@hoge.fuga.com
   11: Cc: aa@bb.cc,dd@ee.ff
   12: Subject: test
   13: 
   14: こんにちは。
   15: これはテストです。
   16: END
   17: 
   18: close(SENDMAIL);

jcode.pl を使う場合は、require 'jcode.pl' して、 &jcode::convert とし、それをそのまま sendmail に渡します。このプログラムも CGI プログラムではないので、コマンドラインから実行して下さい。

mail-j-jcode.pl

    1: #!/usr/local/bin/perl
    2: 
    3: require 'jcode.pl';
    4: 
    5: $sendmail = '/usr/sbin/sendmail';
    6: 
    7: $body = <<END;
    8: こんにちは。
    9: これはテストです。
   10: END
   11: 
   12: &jcode::convert(\$body,'jis');
   13: 
   14: open(SENDMAIL,"| $nkf -j | $sendmail -t -i");
   15: 
   16: print SENDMAIL <<'END';
   17: From: from@foo.bar.com
   18: To: to@hoge.fuga.com
   19: Cc: aa@bb.cc,dd@ee.ff
   20: Subject: test
   21: 
   22: END
   23: 
   24: print SENDMAIL $body
   25: 
   26: close(SENDMAIL);

mime_pls

本文は nkf や jcode.pl を使えばいいのですが、ヘッダはそう簡単にはいきません。例えば Subject ヘッダに日本語を使うときは、 Subject ヘッダを MIME エンコードしなくてはいけません。 MIME エンコードというのは、

=?文字コード?エンコード形式?BASE64変換された文字列?=

という文字列のことです。コード形式というのは

ISO-2022-JP (いわゆる JIS コード)
EUC-JP (いわゆる EUC コード)
Shift_JIS (いわゆる SJIS コード)

などがあります (もちろん日本語だけを対象とした規格ではありませんので、各国の言語をエンコードすることもできます)。 BASE64 変換というのは、元の文字列を3バイト(=24ビット)ごとに区切り、切り出した24ビットをさらに 6ビットごとに分割します。 6ビットですから、0から63までの数値を表せます。この数を「ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/」に対応する文字で置き換えます。結果的に3バイトが、4文字の7ビットASCII文字に変換されるわけです。

ちなみに MIME には B エンコーディングと Q エンコーディングがあり、それぞれ

=?文字コード?B?BASE64変換された文字列?=
=?文字コード?Q?BASE64変換された文字列?=

という形式になっています。

かなり面倒なので、生田昇さんという方が公開されている mime_pls というライブラリを利用しましょう。 http://www.cc.rim.or.jp/~ikuta/mime_pls/index.html ここから mimer.pl と mimew.pl という perl スクリプトを入手できます。 mimer.pl はデコード用、mimew.pl はエンコード用です。今回はエンコードをしたいので、mimew.pl を使います。使い方は簡単で、MIME エンコードしたい文字列を &mimeencode に渡せば、エンコードした文字列を返してくれます。

#!/usr/local/bin/perl

require 'mimew.pl';

$subject = "ほげほげ";
$encoded_subject = &mimeencode($body);

print $encoded_subject;

実行結果は「ほげほげ」となります。

ここまでやってきたことのまとめとして、ヘッダを MIME エンコードし、ボディを nkf コマンドで JIS コードに変換してからメールを送信するサンプルを示します。

mail-2.pl

    1: #!/usr/local/bin/perl
    2: 
    3: require 'mimew.pl';
    4: 
    5: $sendmail = '/usr/sbin/sendmail';
    6: $nkf      = '/usr/local/bin/nkf';
    7: 
    8: $from = '山田太郎 <taroh@foo.org>';         # 宛先の書き方1
    9: $to = 'tanaka@tanaka.hoge.org (田中次郎)';  # 宛先の書き方2
   10: $cc = '河田花子 <hanako@fuga.org>';
   11: 
   12: $subject = 'サブジェクト';
   13: 
   14: $body = <<END;
   15: 本文です。てすとてすと。
   16: ほげほげ。ふがふが。むにゃむにゃ。
   17: END
   18: 
   19: open(SENDMAIL,"| $nkf -j | $sendmail -t -i");
   20: 
   21: # &mimeencode で MIME エンコード
   22: $encoded_from    = &mimeencode($from);
   23: $encoded_to      = &mimeencode($to);
   24: $encoded_cc      = &mimeencode($cc);
   25: $encoded_subject = &mimeencode($subject);
   26: 
   27: print SENDMAIL "From: $encoded_from\n";
   28: print SENDMAIL "To: $encoded_to\n";
   29: print SENDMAIL "Cc: $encoded_cc\n";
   30: print SENDMAIL "Subject: $encoded_subject\n";
   31: print SENDMAIL "\n";
   32: print SENDMAIL "$body";
   33: 
   34: close(SENDMAIL);

このスクリプトを実行すると、

From: 山田太郎
To: tanaka@tanaka.hoge.org (田中次郎)
Subject: サブジェクト

本文です。てすとてすと。
ほげほげ。ふがふが。むにゃむにゃ。

というメールが送られます。

消えたエラーメール

ここまでを参考に CGI 経由でメールを送ってみて下さい。大抵の場合はうまくいくでしょうが、存在しないメールアドレスにメールを送ってみると返信がこない場合があります。

普通は、もし宛先が存在しなかったら発信者にエラーメールが返ってきます。しかし、CGI プログラムが nobody 権限で動作するサーバだと、エラーメールは nobody 宛に返ってきます。 nobody 宛のメールは、root (そのサイトの管理者) に届く場合もありますし、消えてしまう場合もあります。

このあたりはサイトの設定次第です。FreeBSD のデフォルトでは、 /etc/aliases に

nobody: root

と書いてあります。つまり、nobody 宛のメールは root に転送されます。ここに

nobody: /dev/null

と書いてあるなら nobody 宛のメールは /dev/null に追加されます。 /dev/null というファイルにどれだけ書き込んでも /dev/null は常に 0バイトです。つまりメールは消えてしまうわけです。

こういう場合は、sendmail の -f オプションを使います。あなたが hoge というユーザ名ならば

open(SENDMAIL,"| sendmail -t -i -f hoge");

とします。ただし、これは他人のメールアドレスをかたっていることになります。例えば、このホストだと nobody@X68000.startshop.co.jp が hoge@X68000.startshop.co.jp というメールアドレスを偽称しているわけです。そのため、X-Authentication-Warning というヘッダが付くことがあります。「このメールは From エンベロープが偽称されている可能性がありますよ」と宛先に知らせる意味があるわけです。

どうしても気になるなら、管理者にお願いして nobody を trusted user にしてもらいましょう。具体的には /etc/aliases に Tnobody という行を追加すればよいです。ただし、それをするくらいなら suExec を有効にしてもらう方がいいと個人的には思います。

なお、

open(SENDMAIL,"| sendmail -t -i -f hoge\@fuga.com");

と完全なメールアドレスを指定すると、エラーメールはそのメールアドレスに届きます。

TOP >> web と CGI のひみつ >> CGI プログラムからのメール送信 (2)

CGI プログラムからのメール送信 (2)

日本語の扱い

mime_pls

マルチパートメール

消えたエラーメール