にひりずむ::しんぷる - Class::C3のお勉強Class::C3を学んだ モダパーこと「モダンPerl入門」を執筆したことで知られる牧さんの2007年YAPCのセッションがものすごくわかりやすいのでまずはそれを見ると吉。 (Ab)?using Class::C3 - YAPC::Asia 2007 Tokyo Sessions 以下の例で考えてみる。 AをBとCが継承し、DがBとCを継承しているというダイヤモンド型多重継 全てに「add」というメソッドがある 全ての「add」内ではスーパークラスの「add」を呼ぶ 普通に書くとこうなる #!C:/Perl/bin/perl use strict; use warnings; package Klass::A; sub add { my $self = shift; my $str = shift; return "$str -> Klass::A"; } package Klass::
