Help for this page
Select Code to Download
Select
or
download this
$str1 = $str2 if $str2 =~ /\Q$str1\E/i;