自分用perl雛形クラス #------------------------------------------------------------------------------- # ClassHinagata.pm - クラスの雛形 # # 使用例) # # #---------- コンストラクタ # #my $ch = ClassHinagata->new("1st message", "2nd message")…