parent

СОДЕРЖАНИЕ

• ИМЯ
• СИНОПСИС
• ОПИСАНИЕ
• ИСТОРИЯ
• ЗАМЕЧАНИЯ
• СМОТРИТЕ ТАКЖЕ
• АВТОРЫ И СОАВТОРЫ
• ОБНОВИТЕЛЬ
• ЛИЦЕНЗИЯ

ИМЯ

parent - Установление отношений ISA с базовыми классами во время компиляции

СИНОПСИС

package Baz;
use parent qw(Foo Bar);

ОПИСАНИЕ

Позволяет загружать один или несколько модулей, одновременно настраивая наследование из этих модулей. По большей части аналогично

package Baz;
BEGIN {
    require Foo;
    require Bar;
    push @ISA, qw(Foo Bar);
}

По умолчанию каждый базовый класс должен располагаться в отдельном файле. Если вы хотите иметь подкласс и его родительский класс в одном файле, вы можете сказать parent не загружать никакие модули, используя переключатель -norequire:

package Foo;
sub exclaim { "I CAN HAS PERL" }

package DoesNotLoadFooBar;
use parent -norequire, 'Foo', 'Bar';
# will not go looking for Foo.pm or Bar.pm

Это эквивалентно следующему коду:

package Foo;
sub exclaim { "I CAN HAS PERL" }

package DoesNotLoadFooBar;
push @DoesNotLoadFooBar::ISA, 'Foo', 'Bar';

Это также полезно в случае, когда пакет находится в файле с другим именем:

package MyHash;
use Tie::Hash;
use parent -norequire, 'Tie::StdHash';

Это эквивалентно следующему коду:

package MyHash;
require Tie::Hash;
push @ISA, 'Tie::StdHash';

Если вы хотите загрузить подкласс из файла, который require не будет считать допустимым именем файла (то есть он не оканчивается ни на .pm, ни на .pmc), используйте следующий код:

package MySecondPlugin;
require './plugins/custom.plugin'; # contains Plugin::Custom
use parent -norequire, 'Plugin::Custom';

ИСТОРИЯ

Этот модуль был разветвлён от base для удаления накопившихся в нём излишеств.

ЗАМЕЧАНИЯ

СМОТРИТЕ ТАКЖЕ

base

АВТОРЫ И СОАВТОРЫ

Rafaël Garcia-Suarez, Bart Lateur, Max Maischein, Anno Siegel, Michael Schwern

ОБНОВИТЕЛЬ

Max Maischein corion@cpan.org

Copyright (c) 2007-10 Max Maischein <corion@cpan.org> Основано на идее base.pm, представленной в Perl 5.004_04.

ЛИЦЕНЗИЯ

Этот модуль распространяется на тех же условиях, что и сам Perl.