Help for this page
$results{$number} .= "$url... @before <B>$1</B> @after <BR/>";
for $term ( @$inputs ) { while ( /\b$term\b/g ) { ... } }