David McLaughlin > MooseX-ChainedAccessors-0.01 > MooseX::ChainedAccessors::Accessor

Download:
MooseX-ChainedAccessors-0.01.tar.gz

Dependencies

Annotate this POD

CPAN RT

Open  0
Report a bug
Module Version: 0.01   Source  

NAME ^

MooseX::ChainedAccessors::Accessor - Accessor class for chained accessors with Moose

SYNOPSIS ^

    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();

DESCRIPTION ^

MooseX::ChainedAccessors is a Moose Trait which allows for method chaining on accessors by returning $self on write/set operations.

AUTHORS ^

David McLaughlin <david@dmclaughlin.com>

COPYRIGHT AND LICENSE ^

Copyright 2009 David McLaughlin

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.