$zeichenkette =~ s/\s*(\Q$suchstring\E)\s*/$1/g;