perl 中的后期静态绑定 [关闭]

【问题标题】：Late Static Bindings in perl [closed]perl 中的后期静态绑定 [关闭]
【发布时间】：2015-02-05 15:51:44
【问题描述】：

在 perl 中是否有任何语法来指示“后期静态绑定”？在php中，有。 http://php.net/manual/en/language.oop5.late-static-bindings.php

我只是在为 perl 寻找它们。

【问题讨论】：

【解决方案1】：

Perl 没有静态方法，因此您不需要技巧就可以使静态方法表现得像虚拟方法。

package ClassA {       
   sub who { print __PACKAGE__, "\n" }
   sub test { my ($class) = @_; $class->who(); }
}

package ClassB {
   our @ISA = 'ClassA';
   sub who { print __PACKAGE__, "\n" }
}

ClassA->test();  # ClassA
ClassB->test();  # ClassB

【讨论】：