配列でセレクトメニュー(プルダウン)を出力

配列 @prefs を利用する場合

単純に配列をプルダウンメニューとして出力する場合

print "<select name=\"pref\">\n";
 	foreach (1..$#prefs){
 	print "<option value=\"$prefs[$_]\">$prefs[$_]</option>\n";
 	}
 print "</select>\n";

既存データを読み込み、状況を保持して表示する場合(既存の値を$prefとする)

print "<select name=\"pref\">\n";
 	foreach (1..$#prefs){
 	print "<option value=\"$prefs[$_]\"";
 	print " selected" if ($prefs[$_] eq $pref);
 	print ">$prefs[$_]</option>\n";
 	}
 print "</select>\n";
 


2017/11/15(水)
ナンヨウカイワリ釣れました(63センチ・4キロ超)
2017/11/09(木)
キングボンビーに憑かれるorz
2017/11/05(日)
スカ!
Keyword : 配列,セレクトメニュー,プルダウン,select,出力

CopyRight 2004 - 2017 © Nap.st all right reserved.