Actually, you have it a bit backwards, get can see $!z just fine, it is the constructor which is not setting $!z (because it is private).

If you really want to allow setting a private attribute at object creation time you can use a BUILD submethod:

class Dot { has $.x; has $.y; has $!z; # Fancy syntax which simply sets each private variable. submethod BUILD(:$!x, :$!y, :$!z) { say "Initializing!"; } method get { return ($!x, $!y, $!z); } }; my $a = Dot.new(x => 23, y => 42, z => 2); say $_ for $a.get;

Notice that if you create BUILD you are responsible for handling all your attributes.

Though if $!z is private, you probably want to do some checking on it before setting (else, why is it private?). That can be done too by not using the special syntax:

# Blindly accept x and y, but do extra checks on z: submethod BUILD(:$!x, :$!y, :$z) { say "Initializing!"; die "z too big!" if $z > 10; $!z = $z; }

Of course, there are a million other ways to do validation of an attribute (some are better than this), just showing this way since it is relevant to your current investigations.

Update: Oh, and perl6 has a really smart say (ok, smart objects, but whatever), no need to loop anymore just for debugging statements: say $a.get works nicely (as does say $a.get.perl).

Good Day,
    Dean


In reply to Re: Private attributes in Perl 6 objects by duelafn
in thread Private attributes in Perl 6 objects by Anonymous Monk

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":



  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.