Comments on: Perl Module Monday: Object::Tiny (and friends) http://www.dereferenced.com/2011/09/26/perl-module-monday-objecttiny/ A preponderance of Perl, an excess of XML, and additional alliterations. Thu, 19 Jan 2012 08:50:49 +0000 hourly 1 By: Adam Kennedy http://www.dereferenced.com/2011/09/26/perl-module-monday-objecttiny/comment-page-1/#comment-1353 Adam Kennedy Wed, 28 Sep 2011 03:32:18 +0000 http://www.dereferenced.com/?p=205#comment-1353 Actually, that might be a bug after all. If you inherit from something that doesn't have a new method, odds are it should be treated as a role and so we would... @ISA = ( @ISA, 'Object::Tiny' ); Actually, that might be a bug after all.

If you inherit from something that doesn’t have a new method, odds are it should be treated as a role and so we would…

@ISA = ( @ISA, ‘Object::Tiny’ );

]]> By: Steffen Mueller http://www.dereferenced.com/2011/09/26/perl-module-monday-objecttiny/comment-page-1/#comment-1342 Steffen Mueller Tue, 27 Sep 2011 06:48:50 +0000 http://www.dereferenced.com/?p=205#comment-1342 Just a bit of additional info: Object::Tiny::XS doesn't support rw or w accessors because it was written to be an exact drop-in replacement for Object::Tiny as it worked back then. A quick look shows it still works that way, so I'd be inclined to reject a request to add RW variants, though I'd be open for debate. Either way, once you have O::T::XS, you can add rw accessors as follows: use Class::XSAccessor accessors => [qw(foo bar baz)]; It also supports write-only accessors using the 'setters' parameter and lvalue accessors using 'lvalue_accessors': use Class::XSAccessor setters => {set_foo => 'foo', set_bar => 'bar'} lvalue_accessors => [qw(baz)]; Indeed, this requires understanding and using yet another API, but I believe the small featureset and simplicity of Object::Tiny are worth preserving. I hope this code won't be mangled. Won't get my hopes up, though. :) Just a bit of additional info: Object::Tiny::XS doesn’t support rw or w accessors because it was written to be an exact drop-in replacement for Object::Tiny as it worked back then. A quick look shows it still works that way, so I’d be inclined to reject a request to add RW variants, though I’d be open for debate.

Either way, once you have O::T::XS, you can add rw accessors as follows:

use Class::XSAccessor accessors => [qw(foo bar baz)];

It also supports write-only accessors using the ‘setters’ parameter and lvalue accessors using ‘lvalue_accessors’:

use Class::XSAccessor
setters => {set_foo => ‘foo’, set_bar => ‘bar’}
lvalue_accessors => [qw(baz)];

Indeed, this requires understanding and using yet another API, but I believe the small featureset and simplicity of Object::Tiny are worth preserving.

I hope this code won’t be mangled. Won’t get my hopes up, though. :)

]]>