[perl #119083] [BUG] infix operator with several words matches against one space between the words in Rakudo, but not against any other whitespace (as in Niecza and STD.pm6)

[Carl Mäsak]

# New Ticket Created by  "Carl Mäsak" 
# Please include the string:  [perl #119083]
# in the subject line of all future correspondence about this issue. 
# <URL: https://rt.perl.org:443/rt3/Ticket/Display.html?id=119083 >


<masak> r: sub circumfix:<is not>($x) { $x }; say is 42 not; say "alive"
<camelia> rakudo 45e8c4: OUTPUT«42␤alive␤»
<masak> w... wow.
<masak> r: sub infix:<is not>($l, $r) { $l !== $r }; say 5 is␤␤␤␤␤not 42
<camelia> rakudo 45e8c4: OUTPUT«===SORRY!===␤Two terms in a row [...]
<masak> apparently, arbitrary whitespace doesn't work too well.
<FROGGS> r: sub infix:<is not>($l, $r) { $l !== $r }; say 5 is  not 42
# looks like it must match exactly
<camelia> rakudo 45e8c4: OUTPUT«===SORRY!===␤Two terms in a row [...]
<GlitchMr> Actually, that's strange.
<GlitchMr> Last time I've done that, it worked.
<GlitchMr> But perhaps it's because I checked it with Niecza
<FROGGS> I believe it splits the name by space when declaring it, and
joins it later by one when using it
<GlitchMr> I know I once implemented <not in> operator in Perl 6, and
it worked, even as '$elem     not           in       @array'
<masak> there's a possible rakudobug in here, methinks.
<masak> what *should* be the expected behavior?
<GlitchMr> std: sub infix:<is not>($l, $r) { $l !== $r }; say 5 is
             not 42
<camelia> std c2215f0: OUTPUT«ok 00:00 48m␤»
<GlitchMr> STD finds it fine
* masak submits rakudobug