混乱しそうになったのでメモしておく。 結論的には、親クラスのメソッド呼び出しは 「細い矢印+SUPER」 を使おうねというだけの話。詳しくは、以下のソース中の コメントを参照。 { package LivingCreature; sub speak { my $class = shift; print "a $class goes ", $class->sound, "!\n"; } } { package Animal; use base qw{LivingCreature}; } { package Mouse; use base qw{Animal}; sub sound { 'squeak' } sub speak { my $class = shift; # 継承の概念が使われるので、LivingCreature の speak が呼び出される # SUPER::speak は、