while ($i > 0 and $i <= $average) {
		print qq~<img src="http://www.ffinfo.com/images/misc/starfull.gif" width="15" height="15" alt="Full Star" style="vertical-align: bottom" /> ~;
		$i++
	}