こんにちはゲストさん。会員登録(無料)して質問・回答してみよう!

締切り済みの質問

CGI メールフォームからBCCのアドレスにメールが送信できない(Perl)

初心者で簡単なメールフォームを作成しております。
宛先となる支店を選択後、メールのTOにその支店のアドレスが入り、メールは受信できます。同時にBCCにも一人のアドレスを入力してメールを送信したいのですが、BCCにはメールが届きません。
以下に抜粋したソースを記述しますので、どなたかご教授願います。

--------------------- HTML 部分 ------------------------------
<form action="./cgi/●●/sendmail.cgi" name="myform" method="POST">
<table>
<tr><td>あなたのメールアドレス</td>
<td><input type="text" name="email" size="60" maxlength="60"></td>
</tr>
<tr><td>お問合せ先の支店を選択</td>
<td><select name="address">
<option value="" selected>選択してください</option>
<option value="aaaaa@domain.jp">A支店</option>
<option value="bbbbb@domain.jp">B支店</option>
<option value="ccccc@domain.jp">C支店</option>
</select>
</td>
</tr>
<tr>
<td><input type="submit" name="submit" value="送 信"></td>
<td><input type="reset" name="reset" value="キャンセル"></td>
</tr>
</table>
</form>
--------------------- cgi 部分 -------------------------------
require '../cgi-lib.pl';
require '../jcode.pl';

$sendmail = '/usr/sbin/sendmail';
$bcc_address = 'bccbcc@gmail.com';
$email = $in{'email'};
$address = $in{'address'};

&jcode'convert(*email,'sjis');
&jcode'convert(*address,'sjis');

$message = <<EOF;
Subject: 質問
From: $email
Errors-to: $email
Reply-To: $email

-------------------------------------------------------------
質問内容
-------------------------------------------------------------
[お客様のメールアドレス] $email

EOF

open(MAIL,"|$sendmail $address");
print MAIL $message;
print MAIL "BCC: $bcc_address\n";
close(MAIL);
print <<EOF;
Content-Type: text/html

<html>
<head>
<title>送信しました</title>
<meta http-equiv="Content-Type" content="text/html; charset=Shift_JIS">
</head>
<body>
●お客様のメールアドレス $email<br>
</body>
</html>
EOF

投稿日時 - 2009-06-07 00:18:24

QNo.5022969

すぐに回答ほしいです

このQ&Aは役に立ちましたか?

2人が「このQ&Aが役に立った」と投票しています

回答(1)

ANo.1

宛先に届いたメールには、末尾に
Bcc: bccbcc@gmail.com
と書かれていることでしょう。

Bccはヘッダに書かれていなくてはなりません
ヘッダとボディは空行で区切られるのでReply-Toの次にある空行でヘッダは終わりです
空行より前にBccを書きましょう

しかしこんなことなどどうでも良いほどの大問題がありますね
$in{'address'}をチェックして自社以外には送らないようにしなさい
このままではspamの踏み台間違いなし
Subjectに日本語を使うならエンコードしなさい

投稿日時 - 2009-06-07 06:07:58

お礼

ご回答ありがとうございました。
早速、BCCをヘッダに書いて試してみたいと思います。
また、ご指摘頂きました、$in{'address'}のチェックと
Subjectのエンコード処理は実際のプログラム内には記述し、
動作確認もしております。ご指摘ありがとうございました。

投稿日時 - 2009-06-07 10:00:15

あなたにオススメの質問