$str1 = $str2 if $str2 =~ /\Q$str1\E/;