グラフ表示
グラフを表示します。グラフの長さは画像の表示幅で指定します。

@data = (98,78,52); データを配列に用意します。
$w = int($_ * 3);  グラフの長さを調整します。
■プログラム (sample5.cgi)
@data = (98,78,52);
print "<table>";
foreach (@data) {
$w = int($_ * 3);
print "<tr><td>$_</td><td><img src=\"red.gif\" width=$w height=10></td></tr>\n";
}
print "</table>";
■実行結果
98
78
52


HOME Copyright (C) CGI-design All Rights Reserved.