$text2 =~ s/$match/$replace/; $text2 =~ s/$match/$replace/e;