$FileText =~ s/($Search|$)/$1 eq $Search ? $Replace : $AddText/e;