$color=$in{'color'}; |
print NEW "<font color=\"$color\">"; |
print NEW "</font>"; |
<input type=\"radio\" name=\"color\" value=\"#000000" checked /><font color="#000000">黒</font> <input type=\"radio\" name=\"color\" value=\"#FF0000" /><font color="#FF0000">赤</font> <input type=\"radio\" name=\"color\" value=\"#0000FF" /><font color="#0000FF">青</font> <input type=\"radio\" name=\"color\" value=\"#800000" /><font color="#800000">茶</font> <input type=\"radio\" name=\"color\" value=\"#00FF00" /><font color="#00FF00">黄緑</font> <input type=\"radio\" name=\"color\" value=\"#FF00FF" /><font color="#FF00FF">ピンク</font> |