在Perl 6中调用类中的私有方法

Question

我不能在Perl 6中的类中调用私有方法:

class MyClass {

  method !my-private-method($var1) {
    # ....
  }

  method my-method() {
    my $my-var1 = !my-private-method(123); # not found (Undeclared routines)
    my $my-var1 = $!my-private-method(123); # not found (Undeclared routines)
    my $my-var1 = $.my-private-method(123); # not found (Undeclared routines)
    my $my-var1 = my-private-method(123); # not found (Undeclared routines)

那我怎么打电话my-private-method来my-method？

Answer 1

您必须在实例对象上调用private方法.

my $my-var1 = self!my-private-method(123);

应该管用.