> [EMAIL PROTECTED] - Mon Feb 23 15:11:06 2004]: > > Test case #0: > perl -e '$eol = qr/$/m; "foo\nbar\n" =~ /$eol/; print $-[0], "\n"' > > Test case #1: > perl -e '$eol = qr/$/m; "foo\nbar\n" =~ /$eol(?:)/; print $-[0], > "\n"' > > I'm getting the answer 7 from case #0 and 3 from case #1. The correct > answer is 3. (The /$/m pattern should match at the embedded newline > at > position 3.)
[EMAIL PROTECTED] reports 3 for both cases. > Test case #2: > perl -e '$eol = qr/$/; "foo\nbar\n" =~ /$eol/m; print $-[0], "\n"' > > #2 is the converse of #1; it outputs 3 where it should output 7. bleadperl reports 7. I believe this bug is fixed but I'd like to see a test added before closing it. The regex tests scare me.