MooseX::Attribute::Chained − Attribute that returns the instance to allow for chaining
version 1.0.3
package Test; use Moose; has debug => ( traits => [ 'Chained' ], is => 'rw', isa => 'Bool', ); sub complex_method { my $self = shift; #... print "helper message" if $self−>debug; #... } 1;
Which allows for:
my $test = Test−>new; $test−>debug(1)−>complex_method; $test−>debug(1); # returns $test $test−>debug; # returns 1
MooseX::Attribute::Chained is a Moose Trait which allows for method chaining on accessors by returning $self on write/set operations.
• |
Tom Hukins <tom AT eborcom DOT com> |
|||
• |
Moritz Onken <onken AT netcubed DOT de> |
|||
• |
David McLaughlin <david AT dmclaughlin DOT com> |
This software is copyright (c) 2017 by Tom Hukins.
This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.
Please report any bugs or feature requests on the bugtracker website <http://rt.cpan.org/Public/Dist/Display.html?Name=MooseX−Attribute−Chained> or by email to bug-moosex-attribute-chained at rt.cpan.org.
When submitting a bug or request, please include a test-file or a patch to an existing test-file that illustrates the bug or desired feature.