Perl module to make chained class accessors
