Perl6自定义¬逻辑取反操作符编译报错求助

这个问题其实很好解决——你把操作符的使用放在定义前面了！Perl6的编译器是按代码顺序逐行处理的，当它读到第一行的¬ True;时，完全不知道¬是什么玩意儿，因为你的multi sub prefix:<¬>定义还在后面呢，这时候编译器自然会抛出“无效语句”的错误。

修正后的正确代码 #

只需要把操作符的定义挪到使用语句之前就行：

multi sub prefix:<¬> ($n) { return not $n; }
¬ True;  # 现在编译器认得这个操作符了，运行后会输出False

补充小知识点 #

• 在Perl6里自定义操作符（不管是前缀、中缀还是后缀），必须保证定义出现在所有使用该操作符的代码前面，编译器不会提前去后面找定义来解析当前行的代码。
• 如果你的操作符有多个重载实现，也可以先用proto prefix:<¬> ($) {*}提前声明，不过像你这种简单的单实现场景，直接把定义放前面最省事。

内容的提问来源于stack exchange，提问作者user6189164