# New Ticket Created by  zjhm 
# Please include the string:  [perl #64142]
# in the subject line of all future correspondence about this issue. 
# <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=64142 >


Failure:
- Test 6 of t/spec/S05-capture/caps.t

Relevant lines of code ( TestCase 5 & TC 6 ):

> ok 'a b c d' ~~ /[(\w) \s+]+/, 'regex matches';
> is $/.caps.join('|'), 'a|b|c|d', '[(\w)* \s+]+ flattens (...)* for .caps';
>

It looks like the expected text for TC 6 should be 'a|b|c', i.e.:

> is $/.caps.join('|'), 'a|b|c', ...

as the haystack in TC 5 does not have a space after the letter 'd'.

Also note that the pattern in the explanation text in TC 6 does not match
the pattern in TC 5.

Environment info:

> perl6/rakudo$ ./perl6 -v
> This is Rakudo Perl 6, revision 37535 built on parrot 1.0.0-devel
> for i486-linux-gnu-thread-multi.
> Copyright 2006-2008, The Perl Foundation.
>

Reply via email to