$text1 = quotemeta( $text1 );
$text2 =~ s/($text1)/FOO$1BAR/;