Object::Tiny::Lvalue - minimal class builder with lvalue accessors
Define a class:
package Foo; use Object::Tiny::Lvalue qw( bar baz ); 1;
Use the class:
my $object = Foo->new( bar => 1 ); printf "bar is %s\n", $object->bar; $object->bar = 2; printf "bar is now %s\n", $object->bar;
This is a clone of Object::Tiny, but adjusted to create accessors that return lvalues.
Aristotle Pagaltzis <email@example.com>
COPYRIGHT AND LICENSE
This software is copyright (c) 2010 by Aristotle Pagaltzis.
This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.