Поздние статические привязки в perl

Question

Поздние статические привязки в perl

0

Есть ли какая-либо грамматика для обозначения "поздних статических привязок" в perl?? В php есть. http://php.net/manual/en/language.oop5.late-static-bindings.php

Я просто ищу их для perl.

cheek 05 фев. 2015, в 17:18

Источник

Теги:

php

perl

late-static-binding

1 ответ

Ещё вопросы

ikegami · Answer 1 · 2015-02-05T13-48-00.000Z

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