- Perlにコンストラクタはない
- 階層はなるべく浅めに
- 継承を使いたいときは以下の呪文を唱える
- use base qw(Parent); も教科書に載ってました(汗)
use strict;
use vars qw(@ISA);
@ISA = qw(Parent);
- インスタンスフィールドはパッケージのグローバルハッシュとして持つ
- ごめんなさい、嘘です。これはstaticフィールドになります。
use vars qw(%hoge);
BEGIN {
%hoge = (
foo => 'bar',
);
}