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