# New Ticket Created by "Carl Mäsak"
# Please include the string: [perl #103106]
# in the subject line of all future correspondence about this issue.
# <URL: https://rt.perl.org:443/rt3/Ticket/Display.html?id=103106 >
<masak> rakudo: say "foo" & "a nice old foo" ~~ /foo/
<p6eval> rakudo 95371a: OUTPUT«This type cannot unbox to a native string [...]
<masak> b: say "foo" & "a nice old foo" ~~ /foo/
<p6eval> b 1b7dd1: OUTPUT«Bool::True»
<masak> niecza: say "foo" & "a nice old foo" ~~ /foo/
<p6eval> niecza v11-22-gbebf7a0: OUTPUT«all(#<match from(0) to(3)
text(foo) pos([].list) named({}.hash)>, #<match from(11) to(14)
text(foo) pos([].list) named({}.hash)>)»
* masak submits rakudobug
I'm not sure why b's output boolifies there. I like Niecza's result
better. nom's error seems based on a misunderstanding -- the regexp
matcher shouldn't be seeing a junction, because the junctional value
should've autothreaded into individual strings at that point.