foreach $suchbegriff (@namen)
{
	$zeile =~ s/$suchbegriff/$bstart$&$bende/ig;
}