Perlゼミ

1. Perl
›
2. オブジェクト指向プログラミング
›
3. here

単一継承

単一継承とは、親クラスを一つ指定する継承のことを言います。一般的には、多重継承を使わないで、単一継承でオブジェクト指向プログラミングを行うことが推奨されています。

単一継承の実装

単一継承の実装方法を紹介します。Perlには継承を行う方法が複数存在します。公式にはparentモジュールが推奨されていますが、baseモジュールはPerl v5.0から存在し、もっとも多く使われているように感じます。

@ISAを使う場合

@ISAを使った単一継承のサンプルです。

package Point3D;

sub new {
  # ...
}

package Point;

our @ISA = ('Point3D');

baseモジュール

baseモジュールを使った単一継承のサンプルです。

package Point3D;

sub new {
  # ...
}

package Point;

use base 'Point3D';

parentモジュール

parentモジュールを使った単一継承のサンプルです。

package Point3D;

sub new {
  # ...
}

package Point;

use parent -norequire, 'Point3D';