MooseX::AttributeHelpers - Extend your attribute interfaces
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', }, curries => { set => { set_quantity => [ 'quantity' ] } } ); # ... my $obj = MyClass->new; $obj->set_quantity(10); # quantity => 10 $obj->set_mapping(4, 'foo'); # 4 => 'foo' $obj->set_mapping(5, 'bar'); # 5 => 'bar' $obj->set_mapping(6, 'baz'); # 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;
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:
metaclass
This points to a hashref that uses provider for the keys and method for the values. The method will be added to the object itself and do what you want.
provider
method
This points to a hashref that uses provider for the keys and has two choices for the value:
You can supply {method => [ @args ]} for the values. The method will be added to the object itself (always using @args as the beginning arguments).
{method => [ @args ]}
@args
Another approach to curry a method provider is to supply a coderef instead of an arrayref. The code ref takes $self, $body, and any additional arguments passed to the final method.
$self
$body
# ... curries => { grep => { times_with_day => sub { my ($self, $body, $datetime) = @_; $body->($self, sub { $_->ymd eq $datetime->ymd }); } } } # ... $obj->times_with_day(DateTime->now); # takes datetime argument, checks day
Common numerical operations.
Methods for incrementing and decrementing a counter attribute.
Common methods for boolean values.
Common methods for hash references.
Common methods for array references.
Common list methods for array references.
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.
$work
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.
We need tests and docs badly.
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.
Stevan Little <stevan@iinteractive.com>
with contributions from:
Robert (rlb3) Boone
Paul (frodwith) Driver
Shawn (Sartak) Moore
Chris (perigrin) Prather
Robert (phaylon) Sedlacek
Tom (dec) Lanyon
Yuval Kogman
Jason May
Cory (gphat) Watson
Florian (rafl) Ragwitz
Evan Carroll
Jesse (doy) Luehrs
Copyright 2007-2009 by Infinity Interactive, Inc.
http://www.iinteractive.com
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
To install MooseX::AttributeHelpers, copy and paste the appropriate command in to your terminal.
cpanm
cpanm MooseX::AttributeHelpers
CPAN shell
perl -MCPAN -e shell install MooseX::AttributeHelpers
For more information on module installation, please visit the detailed CPAN module installation guide.