以前の質問（8/30(木)10:23:07/送信者にも記入内容を自動送信したい ）で、
送信者へも回答内容を同時に送るという書き込みを参考にして
webform.cgi
の
#■受信先メールアドレス
$mailto = '送信先Ｅメールアドレス';
部分を
#■受信先メールアドレス
$mailto = "xxx\@xxx.xxx,$EMAIL";
と見よう見まねｓｗ書き換えてみたのですが、自分のところにはメールが
送られてきて、送信者へは届きませんでした。
どうすればうまくいくのでしょうか、教えて下さい。

先ず、入力フォームに次の一行を加えてください。
<input type="hidden" name="check" value="on">

次にwebform.cgiの改造です。６６行目あたりに

	if ($name eq "location") { $lct = $value; }
	elsif ($name eq "c_copy" && $value eq "on") { $cc = "on"; }

というのがありますので、その下に次の一行を追加します。

	elsif ($name eq "check" && $value eq "on") { $check = "on"; }

１４３行目あたりに

if ($cc eq "on") { print "<input type=hidden name=\"c_copy\" value=\"on\">\n"; }

というのがありますので、その下に次の一行を追加します。

if ($check eq "on") { print "<input type=\"hidden\" name=\"check\" value=\"on\">\n"; }

次にsub sendmail {　の改造です。２０１行目あたりに、

	close(OUT);

とうのがありますので、一行あけて（改行して）次を追加します。

#自動メール返信処理
	if (!(open(OUT,"| $sendmail -t"))) { &error('システム異常','申し訳ありませんが何らかの原因で処理できません.'); }

	print OUT "X-Mailer: WebFORM v4.0 by www.rescue.ne.jp\n";
	print OUT "X-HTTP_REFERER: $ref\n";
	print OUT "Errors-To: $mailto\n";
	print OUT "To: $email\n";
	print OUT "From: $mailto\n";
	&jis("Subject: $subject"); print OUT "$msg\n";
	print OUT "Content-Transfer-Encoding: 7bit\n";
	print OUT "Content-Type: text/plain\; charset=\"ISO-2022-JP\"\n\n\n";

	&jis("--- ここから ---"); print OUT "$msg\n\n";

	$count = @DATA_N;
	foreach (0..$count-1) {

		if ($DATA_V[$_] =~ /\n/) { &jis("$DATA_N[$_] =\n\n$DATA_V[$_]\n"); print OUT "$msg\n"; }
		else { &jis("$DATA_N[$_] = $DATA_V[$_]"); print OUT "$msg\n"; }
	}

	&jis("--- ここまで ---"); print OUT "\n$msg\n\n";

	close(OUT);

以上で改造は終了です。入力された内容が入力者へも送信されます。

<input type="hidden" name="check" value="on">
を
<input type="checkbox" name="check" value="on">控えメール必要
とでもすれば、入力者の意志で返信メールを選択することもできます。