Moose role BUILD question

saintex has asked for the wisdom of the Perl Monks concerning the following question:

Hello Monks,
I have a problem with Moose::Role.

I would like to start a method defined in the class, that is called in the BUILD method of my role.

I simplified the code, just in order to esemplify the problem.
This is the code:


package Browser;
our $VERSION=0.01;

use Moose::Role;

requires qw(cookieCreate cookieDelete navigation);

sub BUILD {
     
    my $self = shift;

     $self->cookieCreate;

 }
[download]

And this is the package:


package MyPackage;

use Moose;
with 'Browser';


sub BUILD     {
    my $self = shift;
    Browser->BUILD; # or super->BUILD  ?

}

 sub cookieCreate {
    my $self = shift;
    

    
}
[download]

I have this error:

Can't locate object method "cookieCreate" via package "Browser" at ...
[download]

Comment on Moose role BUILD question Select or Download Code

Replies are listed 'Best First'.
Re: Moose role BUILD question by ikegami (Patriarch) on Mar 23, 2011 at 16:46 UTC
`$self->Browser::BUILD();` [download]	[reply] [d/l]
Re^2: Moose role BUILD question by saintex (Scribe) on Mar 24, 2011 at 10:41 UTC
Thank you! In this way it works!	[reply]
Re: Moose role BUILD question by stvn (Monsignor) on Mar 24, 2011 at 13:20 UTC
Actually this code has a problem, if your class has a BUILD method in it, then the role method will never get consumed. ikegami's solution will fix it for you, but it bypasses the nice aspects that BUILD and the BUILDALL method that calls it. Instead I suggest the more common Moose idiom which is to use method-modifiers with roles and BUILD, so your Browser role would look more like: `package Browser; our $VERSION=0.01; use Moose::Role; requires qw(cookieCreate cookieDelete navigation); sub BUILD {} after 'BUILD' => sub { my $self = shift; $self->cookieCreate; };` [download] This will then work with classes which do not have an existing BUILD (by installing the empty one in the role) and ones which have an existing BUILD (local class beats role in composition, but the after modifier will always get applied). -stvn	[reply] [d/l]
Re^2: Moose role BUILD question by ikegami (Patriarch) on Mar 24, 2011 at 18:53 UTC
I agree that your solution is more idiomatic and cleaner, but what features are bypassed by the method I posted?	[reply]
Re^3: Moose role BUILD question by stvn (Monsignor) on Mar 24, 2011 at 22:43 UTC
The real problem was more in the OPs code. By putting a BUILD method in his role, he would have run into an issue if he tried to compose it into a class which already had a BUILD, because the local class version of a method beats the role version of it. So actually it is not really that your version was bypassing so much as just not using Roles properly. Once a role is composed into a class, it really should be "forgotten" about since all the methods are basically already "copied" into the class. Additionally, the BUILD method is never really meant to be called by outside-of-Moose-internals code, it is meant to be called by BUILDALL and in a very specific order so that the object is initialized properly. This is all done within the context of inheritance, which is a Class specific thing. Roles do not inherit, which is why we have to do the weird tricks I showed above to hook into BUILD from a role. So while your solution will force the call to Browser::BUILD and it will happen during the BUILD of the consuming class, it is bypassing all that machinery. Currently, the result is the same, but since you are calling things usually only reserved for internals to call, there is a possibility (although very slim) that this might cause issues down the road. -stvn	[reply]