You probably want something like this:

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

The \Q and \E escape special characters in $str1, if there are any. The /i modifier gives you case-insensitivity.

-- Mike

--
just,my${.02}