moosex::attribute::chainedclone(3pm) [debian man page]

MooseX::Attribute::ChainedClone(3pm)			User Contributed Perl Documentation		      MooseX::Attribute::ChainedClone(3pm)

NAME

       MooseX::Attribute::ChainedClone - Attribute that returns a cloned instance

VERSION

       version 1.0.1

SYNOPSIS

	 package Test;
	 use Moose;

	 has debug => (
	     traits => [ 'ChainedClone' ],
	     is => 'rw',
	     isa => 'Bool',
	     default => 0,
	 );

	 sub complex_method
	 {
	     my $self = shift;

	     #...

	     print "helper message" if $self->debug;

	     #...
	 }

	 sub clone {
	     my $self = shift;
	     # custom clone code here
	     # defaults to:
	     return bless { %$self }, ref $self;
	 }

	 1;

       Which allows for:

	   my $test = Test->new;
	   $test->debug(1)->complex_method; # debug enabled
					    # complex_method is called on a cloned instance
					    # with debug set to 1

	   $test->complex_method;	    # debug is still disabled on $test

	   $test->debug(1); # returns a cloned $test instance with debug set to 1
	   $test->debug;    # returns 0

DESCRIPTION

       MooseX::Attribute::ChainedClone is a Moose Trait which allows for method chaining on accessors by returning a cloned instance of $self on
       write/set operations.

       If $self has a "clone" method, this method is invoked to clone the instance.  This allows for easy integration with MooseX::Clone or any
       custom made clone method. If no "clone" method is available, the new instance is build using "bless { %$self }, ref $self".

AUTHORS

       o   Moritz Onken <onken@netcubed.de>

       o   David McLaughlin <david@dmclaughlin.com>

COPYRIGHT AND LICENSE

       This software is copyright (c) 2012 by Moritz Onken.

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

perl v5.14.2							    2012-01-28				      MooseX::Attribute::ChainedClone(3pm)

Check Out this Related Man Page

MooseX::Getopt::Meta::Attribute::Trait(3pm)		User Contributed Perl Documentation	       MooseX::Getopt::Meta::Attribute::Trait(3pm)

NAME

       MooseX::Getopt::Meta::Attribute::Trait - Optional meta attribute trait for custom option names

VERSION

       version 0.59

SYNOPSIS

	 package App;
	 use Moose;

	 with 'MooseX::Getopt';

	 has 'data' => (
	     traits    => [ 'Getopt' ],
	     is        => 'ro',
	     isa       => 'Str',
	     default   => 'file.dat',

	     # tells MooseX::Getopt to use --somedata as the
	     # command line flag instead of the normal
	     # autogenerated one (--data)
	     cmd_flag  => 'somedata',

	     # tells MooseX::Getopt to also allow --moosedata,
	     # -m, and -d as aliases for this same option on
	     # the commandline.
	     cmd_aliases => [qw/ moosedata m d /],

	     # Or, you can use a plain scalar for a single alias:
	     cmd_aliases => 'm',
	 );

DESCRIPTION

       This is a custom attribute metaclass trait which can be used to specify a the specific command line flag to use instead of the default one
       which MooseX::Getopt will create for you.

METHODS

   cmd_flag
       Changes the command-line flag to be this value, instead of the default, which is the same as the attribute name.

   cmd_aliases
       Adds more aliases for this command-line flag, useful for short options and such.

   has_cmd_flag
   has_cmd_aliases
AUTHOR

       Stevan Little <stevan@iinteractive.com>

COPYRIGHT AND LICENSE

       This software is copyright (c) 2007 by Infinity Interactive, Inc.

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

perl v5.18.2							    2013-11-30			       MooseX::Getopt::Meta::Attribute::Trait(3pm)

Linux and UNIX Man Pages

moosex::attribute::chainedclone(3pm) [debian man page]

Check Out this Related Man Page