> [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.

Reply via email to