うい。そーです。まいむまいむですょー^^
require 'mimew.pl';
サブジェクトでは文字化けを防ぐ。ヘッダ内メッセージはソースが文字化けしてくれるのです。
携帯だとサブジェクト以外ほぼ
&jcode::convert(\$msg0, 'jis');
パソだとサブジェクトなど一部以外
&jcode::convert(\$msg0, 'euc');
HPで確認させるときは
&jcode::convert(*zyusyo, 'sjis');
パソが自分のサーバーならsendmailが使えるので
・・・といってもWindowsは持ってないので
どっからか拾ってくるんです。
open(MAIL, "| $sendmail -t");
print MAIL "TO: $mailto\n";
print MAIL "FROM: $ml\n";
print MAIL "Subject: $subject_encode2\n";
print MAIL "Content-Transfer-Encoding: 7bit\n";
print MAIL "Content-Type: text/plain\; charset=\"ISO-2022-JP\"\n\n";
print MAIL "Name==>>$name1\n\nAddress==>>$zyusyo1\n\nE-Mail==>>$ml1\n\nAccount name==>$sinml1\n\n";
print MAIL "\n";
close(MAIL);
な感じに振らないとわけわかんない状態になってしまいました。今の携帯もキャリアごとに違うのかもしれないですからなんとも・・・
参考までってことで。