NAME
MooseX::AttributeHelpers - Extend your attribute interfaces
SYNOPSIS
package MyClass;
use Moose;
use MooseX::AttributeHelpers;
has 'mapping' => (
metaclass => 'Collection::Hash',
is => 'rw',
isa => 'HashRef[Str]',
default => sub { {} },
provides => {
exists => 'exists_in_mapping',
keys => 'ids_in_mapping',
get => 'get_mapping',
set => 'set_mapping',
},
);
# ...
my $obj = MyClass->new;
$obj->set_mapping(4, 'foo');
$obj->set_mapping(5, 'bar');
$obj->set_mapping(6, 'baz');
# prints 'bar'
print $obj->get_mapping(5) if $obj->exists_in_mapping(5);
# prints '4, 5, 6'
print join ', ', $obj->ids_in_mapping;
DESCRIPTION
While Moose attributes provide you with a way to name your accessors, readers, writers, clearers and predicates, this library provides commonly used attribute helper methods for more specific types of data.
As seen in the "SYNOPSIS", you specify the extension via the metaclass
parameter. Available meta classes are:
- Number
-
Common numerical operations.
- Counter
-
Methods for incrementing and decrementing a counter attribute.
- Collection::Hash
-
Common methods for hash references.
- Collection::Array
-
Common methods for array references.
- Collection::List
-
Common list methods for array references.
CAVEAT
This is an early release of this module. Right now it is in great need of documentation and tests in the test suite. However, we have used this module to great success at $work
where it has been tested very thoroughly and deployed into a major production site.
I plan on getting better docs and tests in the next few releases, but until then please refer to the few tests we do have and feel free email and/or message me on irc.perl.org if you have any questions.
TODO
We need tests and docs badly.
BUGS
All complex software has bugs lurking in it, and this module is no exception. If you find a bug please either email me, or add the bug to cpan-RT.
AUTHOR
Stevan Little <stevan@iinteractive.com>
with contributions from:
Robert (rlb3) Boone
Chris (perigrin) Prather
Robert (phaylon) Sedlacek
Tom (dec) Lanyon
Yuval Kogman
COPYRIGHT AND LICENSE
Copyright 2007, 2008 by Infinity Interactive, Inc.
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.