$bstart = "<b>";
$bende = "</b>";


foreach $suchbegriff (@namen)
{
	foreach $zeile (@allezeilen) 
	{
		if ($zeile =~ /$suchbegriff/ig) {
			$zeile =~ s/$suchbegriff/$bstart$&$bende/ig;
			$zeile = "$zeile \n";
			push(@begriffgefunden, $zeile);
		}
}
}