...

while ($data = $sth->fetchrow_arrayref()) {
	last if ++$count > $best;
	print "$count) ",join(' // ', @$data)," ",
		$cgi->a({href=>'showquery.cgi',
			 query=>$data->[0]},'query')," ",
		$cgi->a({href=>'showhit.cgi',
			 query=>$data->[0],
			 hit=>$data->[1]},'hit'),
		$cgi->br();
}