Beefy Boxes and Bandwidth Generously Provided by pair Networks
Think about Loose Coupling
 
PerlMonks  

Re^2: Moose object construction

by saintex (Scribe)
on Feb 10, 2011 at 09:06 UTC ( [id://887370]=note: print w/replies, xml ) Need Help??


in reply to Re: Moose object construction
in thread Moose object construction

Hello, just tried:
$self->visitors($rules->{navigation}->{visitors});
but I have:
Cannot assign a value to a read-only accessor at ...
So that doesn't work.

Replies are listed 'Best First'.
Re^3: Moose object construction
by stvn (Monsignor) on Feb 10, 2011 at 16:10 UTC

    What you want to do is change your visitor attribute to be something like:

    has 'visitors' => ( is => 'ro', writer => '_set_visitors', init_arg => undef, );
    Then inside your BUILD method, you will want to do:
    $self->_set_visitors( ... );
    The init_arg being set to "undef" will ensure that no one can do:
    MyClass->new( visitors => ... )
    But all this said, you should really spend some time reading the Moose::Manual. Several of the mistakes you have made seem to be caused by the fact you are guessing and/or making assumptions of your own about how Moose works, rather then actually taking the time to learn how it actually works. You also might find some of the presentations on http://moose.perl.org helpful as well, there are several excellent introductory ones from recent conferences.

    You really too should give a look to MooseX::SimpleConfig as it solves this problem for you and the code has been battle tested already.

    -stvn
      Thanks for this. I wasn't aware that you could have a writer defined for a ro attribute. It still seems wrong to me that a writer should exist, and work, on a ro attribute, but it does solve the problem.
        It still seems wrong to me that a writer should exist, and work, on a ro attribute

        Well, really the 'ro' and 'rw' are just shorthand for the various combinations of 'reader', 'writer' and 'accessor'. So a 'ro' attribute is just shorthand for:

        has 'foo' => ( reader => 'foo' );
        And a 'rw' attribute is just shorthand for:
        has 'foo' => ( accessor => 'foo' );
        It is also quite possible to do really weird things like:
        has 'foo' => ( reader => 'get_foo', writer => 'set_foo', accessor => ' +foo' );
        which may seem odd, but could be very useful in some situations where the API requires it. This is all part of Moose's policy to provide the best practices at your fingertips, but not get in the way when you need to do something weird, which if you think about it is not all that different from Perl itself.

        -stvn
Re^3: Moose object construction
by thargas (Deacon) on Feb 10, 2011 at 13:12 UTC

    Sorry about that. You can work around that somewhat by making the attribute rw, but with an internal writer, say _set_visitors(), so you can set the visitors attribute from within your code, but visitors() can't be used to set it.

    It's not perfect, but the only way around it that I can see would be to dynamically make the attribute rw, set the value and then make it ro, which isn't pretty. I'm assuming that can be done, though I've never tried.

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://887370]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others making s'mores by the fire in the courtyard of the Monastery: (5)
As of 2024-03-29 06:42 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found