ＨＴＭＬ側データの摘出方法

締切済

質問者：kohkun2008
質問日時：2008/09/22 12:47
回答数：1件

フォームメールを作っているのですがＨＴＭＬ側のデータが希望通りに摘出出来ません。

【ＣＧＩ側一部】
push(@DATA_N,$name);
push(@DATA_V,$value);

foreach (0..$count-1) {

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

}

【ＨＴＭＬ側】
<BODY>

<h1>ＷＥＢＦＯＲＭ用サンプルフォーム</h1>

<FORM method="POST" action="webform.cgi">

<INPUT type="hidden" name="location" value="http://abc.com/123.htm">

<INPUT type="hidden" name="subject" value="フォームメール">

質問：<INPUT size="50" type="text" name="質問"><BR>
名前：<INPUT size="50" type="text" name="Yourname"><BR>
メール：<INPUT size="50" type="text" name="Email"><BR>
<BR>
<INPUT TYPE="submit" VALUE="確認">
<INPUT TYPE="reset" VALUE="リセット">
<p>

<input type="checkbox" name="c_copy" value="on" checked>　送信内容のコピーを表示<br>
<input type="checkbox" name="no_check" value="on">　内容確認画面を出さないで送信する

</FORM>
</BODY>

上記の設定で【質問】【名前】【メール】の項目と値が全て送られて来るのですが、送られてくる順番を【名前】が先頭であとはＨＴＭＬ側の順番通りにしたいと思います。
以下のように行が何番目かを指定すれば結果は得られるのですが複数のＨＴＭＬに対応させる為【名前】項目が何番目に来るかが指定出来ません。

foreach (1) {

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

}

そこでＨＴＭＬ側
名前：<INPUT size="50" type="text" name="Yourname">
のname="Yourname"部分を使って指定出来ないかとあれこれ試してみますがうまくいきません。
有識者の方々のご指導いただければ幸いです。何卒宜しくお願いします。

通報する

この質問への回答は締め切られました。

質問の本文を隠す

回答 (1件)

最新から表示
回答順に表示

No.1

回答者： okmotokun
回答日時：2008/09/22 22:28

前回の質問に回答した者です。

前回の回答ではご理解いただけなかったようなのでもう一度。

名前項目の $name、$value それぞれリストの先頭に置くようにしたい、ということですよね。
ならば、スクリプトの、フォームから受信したデータをパースしている部分、つまり、データを分解して
push(@DATA_N,$name);
push(@DATA_V,$value);
の処理をしているところです。
ここを次のようにすればいいと思います。
$queryは、STDIN または $ENV{'QUERY_STRING'} を代入した変数です。変数名とコードの書き方は違うかもしれません。
for(split(/&/,$query)){
($name,$value)=split(/=/);
#decode
if($name eq 'Yourname'){$val=$value}
else{push(@DATA_N,$name);push(@DATA_V,$value);}
}
unshift(@DATA_N,'Yourname');
unshift(@DATA_V,$val);