書き込みに色をつけるCGI
これまでのCGIでも充分掲示板の役割があるが、
このままでは味気ないので、コメントに色をつけられるようにする。

書き込みが行われる際に、色を選択してもらう。
どの色を選んだかを記録しておき、
表示する際に色つきで表示させるために、
print文で、文字色を変えるためのHTMLタグを出力する。

これまでに作ったCGIの
$com=$in{"com"};
の下に以下を追記する。

$color=$in{'color'};

続いて、
print NEW "$time<br>\n";
の下に以下を追記する。

print NEW "<font color=\"$color\">";

これで名前とコメント欄に色をつけるためのHTMLタグが書けた。
今度はこれを閉じるために
else{print NEW "こんにちは。<p>\n"}
の下に以下を追記する。

print NEW "</font>";

次は、色を選択できるボタンを用意する。
</textarea>
の下に以下を追記しよう。

<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>

これで色を選択できるボタンができた。