[perl #122654] [BUG] Operator starting with a bang (!) and having a Unicode character in it not recognized by Rakudo

[Carl Mäsak]

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


<masak> ok, second iffy-related weirdness:
<masak> m: multi infix:«<:» { $^l lt $^r }; multi infix:«!<:» {
not($^l <: $^r) }; say "foo" !<: "bar"
<camelia> rakudo-moar d8c834: OUTPUT«True␤»
<masak> now watch as I perform my magic trick:
<masak> m: multi infix:«≃» { $^l lt $^r }; multi infix:«!≃» { not($^l
≃ $^r) }; say "foo" !≃ "bar"
<camelia> rakudo-moar d8c834: OUTPUT«===SORRY!=== Error while
compiling /tmp/q8BePJqzE4␤Cannot negate ≃ because it is not iffy
enough␤at /tmp/q8BePJqzE4:1␤------> x:«!<:» { not($^l ≃ $^r) }; say
"foo" !≃⏏ "bar"␤»
<masak> *exactly* the same code -- just with a Unicode operator instead!
* masak submits rakudobug

Surely if the first bit of code works, the second should, too.