CGIメールフォームの件名について

Question

ホームページ上にCGIで動作するメールフォームを作成しました。実際にmailform.htmlとmailform.cgiをアップロードして、正常に送信先のメールアドレスにメールフォームの内容が送信されてきました。しかし届いたメールの件名は(件名なし)と表示されます。　ＣＧＩプログラムに関してほとんど知識が無いので、mailform.html mailform.cgiはテンプレートを使用しています。 mailform.htmlの内容に件名を追加して、実際に届くメールに件名が表示されるようにするには、CGIファイルにどう記述すればよいでしょうか。

お問い合わせ内容
お名前
電子メール
電話番号

require 'jcode.pl'; #Get the input read (STDIN, $buffer, $ENV{'CONTENT_LENGTH'}); #Split the name-value pairs @pairs = split (/&/,$buffer); foreach $pair(@pairs) { ($name, $value) = split(/=/, $pair); #Un-Webify plus signs and %-encoding $value=~tr/+/ /; $value=~s/%([a-fA-F0-9][a-fA-F0-9])/pack("C",hex($1))/eg; $FORM{$name} = $value; if ( $name ne "to" ) { push (@fields, $name) unless (grep(/^$name$/, @fields)); } } # ### 送信フォーマット # $mail_msg = ""; foreach $field (@fields) { $mail_msg = "$mail_msg----------------------------------------------- "; $mail_msg = "$mail_msg($field) $FORM{$field} "; } $mail_msg = "$mail_msg----------------------------------------------- "; # ### ShiftJis to Jis # &jcode'convert(*mail_msg, 'jis'); open(MAIL,"| $mailprog $mailto")|| die "Can't open $mailprog! "; print MAIL $mail_msg; close(MAIL); # ### Make the person feel good for writing to us # print "Content-type: text/html "; print "Thank you! "; print " "; print "

送信いただき、ありがとうございました！

"; print " "; よろしくお願いします。

ORUKA1951 · Accepted Answer

MAIL も他のHTTPなどの通信と同じようにヘッダ部分と、空行を置いて本文になります。
ヘッダ部分に
To: 
Subject:
From:
Reply-To: 
Content-Transfer-Encoding: 7bit
Content-Type: text/plain; charset=ISO-2022-JP
は揃ってますか？？？受信メールのソースを確認すること

なお、基本的にiso-2022-jpで送信されますから、Subjectや差出人、あて先に日本語を含む場合は、Base64エンコードが必要です。それには、 MIME::Base64 モジュールの encode_base64を使用すると簡単で良いでしょう。

ちゃんとしたフォームメールCGIには、これらはすべて含まれているはずです。また、上記のスクリプトでは同名のハッシュは上書きされてしまいますよ。

ヘッダのSubject:については、カテゴリーを選択させて自動的にタイトルをつけさせるほうが良いです。CGIを使いまわし出来ますし、受信側で振り分けも出来ます。

CGIメールフォームの件名について

MAIL も他のHTTPなどの通信と同じようにヘッダ部分と、空行を置いて本文になります。

関連するカテゴリからQ&Aを探す

デイリーランキングこのカテゴリの人気デイリーQ&Aランキング

マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング