Perl の SUPER 擬似クラス - メモ -

SUPER擬似クラスは, ベースクラスのことを指すのだそうです.

use base qw (Hoge::Fuga::Base);

~~ ry) ~~

sub new {
my ($class, $args) = @_;
~~ ry) ~~
my $obj = $class->SUPER::new(\%new_args);
~~ ry) ~~

}

などとするときのSUPER::new は Hoge::Fuga::Base のものということですね.

勉強になりました.

Ref.
http://ja.wikibooks.org/wiki/Perl/%E3%83%A9%E3%82%A4%E3%83%96%E3%83%A9%E3%83%AA%E3%83%BB%E3%83%A2%E3%82%B8%E3%83%A5%E3%83%BC%E3%83%AB%E3%81%A8%E3%82%AA%E3%83%96%E3%82%B8%E3%82%A7%E3%82%AF%E3%83%88%E6%8C%87%E5%90%91