$str1 = $str2 if $str2 =~ /$str1/;