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

配列 @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";
 


2018/04/23(月)
久々にイカGET
2018/04/22(日)
釣らずに大物GET!
2018/04/13(金)
魚っ気はあるんだがなー
Keyword : 配列,セレクトメニュー,プルダウン,select,出力

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