/perl/perl-class-accessor-chained/