X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FMoose%2FCookbook%2FWTF.pod;h=4b07bcdd514bac090d82cca2e1f59bf14a6536d9;hb=01cee73400920d7824b9016d9307139316bd1a2d;hp=b0dfa8a733f5e01e64ede1c2eb552ca5132a50c3;hpb=43b50af34c88c00f35c97282cfcb8f5cd5bd81c4;p=gitmo%2FMoose.git diff --git a/lib/Moose/Cookbook/WTF.pod b/lib/Moose/Cookbook/WTF.pod index b0dfa8a..4b07bcd 100644 --- a/lib/Moose/Cookbook/WTF.pod +++ b/lib/Moose/Cookbook/WTF.pod @@ -72,7 +72,7 @@ because of the order in which classes are constructed, Moose would overwrite your custom accessor. You wouldn't want that would you? -=head2 Method Modfiers +=head2 Method Modifiers =head3 How come I can't change C<@_> in a C modifier? @@ -109,9 +109,9 @@ Here is some sample code: return reverse @rv; }; -=head2 Moose and Attributes +=head2 Moose and Subroutine Attributes -=head3 Why doesn't attributes I inherited from a superclass work? +=head3 Why don't subroutine attributes I inherited from a superclass work? Currently when you subclass a module, this is done at runtime with the C keyword but attributes are checked at compile time @@ -119,7 +119,12 @@ by Perl. To make attributes work, you must place C in a C block so that the attribute handlers will be available at compile time like this: - BEGIN { extends qw/Foo/ } + BEGIN { extends qw/Foo/ } + +Note that we're talking about Perl's subroutine attributes here, not +Moose attributes: + + sub foo : Bar(27) { ... } =head2 Moose and Other Modules @@ -127,6 +132,67 @@ compile time like this: See L. +=head2 Roles + +=head3 How come BUILD is not called for my composed roles? + +BUILD is never called in composed roles. The primary reason is that +roles are B order sensitive. Roles are composed in such a way +that the order of composition does not matter (for information on +the deeper theory of this read the original traits papers here +L). + +Because roles are essentially unordered, it would be impossible to +determine the order in which to execute the BUILD methods. + +As for alternate solutions, there are a couple. + +=over 4 + +=item * + +Using a combination of lazy and default in your attributes to +defer initialization (see the Binary Tree example in the cookbook +for a good example of lazy/default usage +L) + +=item * + +Use attributes triggers, which fire after an attribute it set, to facilitate +initialization. These are described in the L docs and examples can be +found in the test suite. + +=back + +In general, roles should not I initialization, they should either +provide sane defaults or should be documented as needing specific +initialization. One such way to "document" this is to have a separate +attribute initializer which is required for the role. Here is an example of +how to do this: + + package My::Role; + use Moose::Role; + + has 'height' => ( + is => 'rw', + isa => 'Int', + lazy => 1, + default => sub { + my $self = shift; + $self->init_height; + } + ); + + requires 'init_height'; + +In this example, the role will not compose successfully unless the class +provides a C method. + +If none of those solutions work, then it is possible that a role is not +the best tool for the job, and you really should be using classes. Or, at +the very least, you should reduce the amount of functionality in your role +so that it does not require initialization. + =head1 AUTHOR Stevan Little Estevan@iinteractive.comE @@ -135,7 +201,7 @@ Anders Nor Berle Edebolaz@gmail.comE =head1 COPYRIGHT AND LICENSE -Copyright 2006, 2007 by Infinity Interactive, Inc. +Copyright 2006-2009 by Infinity Interactive, Inc. L