perl-class-accessor-grouped