/dev-perl/Class-Accessor-Grouped/