■8393 / ) |
チェックボックスの値を出力するには?
|
□投稿者/ hiro -(2004/01/11(Sun) 18:26:03)
| こんにちは、hiroです。 また、お世話になります。
CGI/Perl(v.5)の記述で 配列で指定した値を、チェックボックスで複数選択してファイルに出力しようとしても1つの値しか書き込めません。 また、同様に管理画面で同じチェックボックスで入力された値を修正して、複数選択したものを登録しても1つの値しか出力されません。 マニュアル等を見ていろいろ試してみても解決できません。 どなたか教えていただける方がいれば幸いです。 当該部分の記述を以下に示しました。よろしくお願いします。
ファイルに書き込むソース(チェックボックスの部分を抽出)は次のようにしています。 @parts = ('data1','data2','data3','data4','data5'); print "<form action=\"$script\" method=\"POST\">\n"; foreach (0 .. $#parts) { print "<input type=\"checkbox\" name=p value=\"$_\">$parts[$_]\n";} print "<input type=submit value='登録'><input type=reset value='リセット'></form>\n";
ファイルを読み込んで修正するソース(同部分)は次のように記述。 foreach (0 .. $#parts) {if ($p == $_) { print "<input type=\"checkbox\" name=p value=\"$_\" checked>$parts[$_]\n";} else{print "<input type=\"checkbox\" name=p value=\"$_\">$parts[$_]\n";}}
|
|