こういうことをしても良いのかどうか不安だったので調べたら、大丈夫のようだった。 PerlのClass::Data::Inheritableの解析 package Parent; use strict; use base qw(Class::Data::Inheritable); __PACKAGE__->mk_classdata(qw(hoge)); 1; package Child; u…