You can delimit the special characters with a substitution just prior to the regex test. ie:
$str2 =~ s/\(/\\\(/; $str2 =~ s/\)/\\\)/; There is probably a better way to do this, but this came first off the top of my head. -Wayne � -----Original Message----- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] Sent: Tuesday, December 14, 2004 1:31 PM To: [EMAIL PROTECTED] Subject: Mismatching matches? Hi. How can I isolate stuff inside a string so that two identical strings will match when they ought to? �Sample code: $str1 = " � �<TD class=xd01>3.04 (build 14)</TD>"; $str2 = "3.04 (build 14)"; if ($str1 !~ /$str2/) { � print "no match?\n"; } else { � print "match!\n"; } The result this yields is "no match?", and not what I expect: "match!". I suspect the parentheses are responsible for this, so how can I rewrite the comparison to yield the result I need--and still work with other, more normal, strings? Thanks! Deane _______________________________________________ ActivePerl mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
