MT::Mailでメールを送信すると文字化けします。文字コードはUTF

MT::Mailでメールを送信すると文字化けします。文字コードはUTF-8でMovableType5を使用しています。

MovableTypeオブジェクトリファレンスにあるとおり、
use MT::Mail;
my %head = ( To => '[e-mail]', Subject => '件名' );
my $body = '本文';
MT::Mail->send(?%head, $body)
or die MT::Mail->errstr;
と、すると文字化けしたメールが送られてきます。

MySQLからデータを取得して件名、本文に入れ、メールすると文字化けせずに送れます。
my $sample = Sample::Object->load(undef,undef);
my $body = $sample->text;
my $subject = $sample->name;

my %head = ( To => '[e-mail]', Subject => $subject );
MT::Mail->send(?%head, $body)
or die MT::Mail->errstr;


mt-config.cgiには
DefaultLanguage ja
MailEncoding ISO-2022-JP
を追記しています。

mysqlの文字コードはUTF-8になってます。
character_set_client | utf8
character_set_connection | utf8
character_set_database | utf8
character_set_filesystem | binary
character_set_results | utf8
character_set_server | utf8
character_set_system | utf8

ファイルに直に書いたときに文字化けしない方法はありますか。
よろしくお願いします。

No.1 回答者： t-okura 回答日時： 2010/05/25 22:27

ファイルに直に日本語を書いているのだったら

use utf8;
が必要かも。ダメモトで試してください。

この回答への補足

use utf8;試してみましたがダメでした。

補足日時：2010/05/26 13:19

No.2 ベストアンサー 回答者： ryu_chan 回答日時： 2010/05/26 18:25

MovableTypeって使ったことないのですが、'件名'、'本文'というのが短いため、文字コードの推測に失敗しているということはないでしょうか？

長い文章でどうなるか一度テストしてみてください。
あるいは、Shift-JISやEUC-JPのほうが推測制度が高いかもしれないので、これも試してみてはいかかでしょうか？

この回答へのお礼

長い文章にしてみたところ解決しました。ありがとうございます。^^

お礼日時：2010/06/07 13:02