Class::Data::Inheritable について

こういうことをしても良いのかどうか不安だったので調べたら、大丈夫のようだった。
PerlのClass::Data::Inheritableの解析

package Parent;
use strict;
use base qw(Class::Data::Inheritable);
__PACKAGE__->mk_classdata(qw(hoge));

1;

package Child;
use strict;
use base qw(Parent Class::Data::Inheritable);
__PACKAGE__->mk_classdata(qw(moe));

1;

それはそうと、「プログラ増田」氏の語りくちは軽妙で良いなと思った。単に JOJO テイストが良かっただけかもしれないが。