this post was written before perl6 tag was added
your code does not seem at all perl code to me. Even if I'm not at all an ObjectOriented monk, as far as I know class is not used to declare classes. See package

The keyword has is used in ObjectOriented (OO) perl by modules like Moose and Moo see Moose::Manual to get started.

Before other attempts go read perlootut as introduction and other introduction manual entries in the same site: perlintro and all the language section starting with perlsyn

As side read take your opy of the wonderful ModernPerl book and notice that it stress OO on Moose even if this is not the only way do to OO in Perl.

In my library I have some links about objects

As final note Perl is the language name; perl is the program; PERL just does not exits

L*

PS use  <c> code tags</c> to rend your code in nodes: try to edit your post to use that tags. See Tutorials and Writeup Formatting Tips

PPS if this is a Perl6 question modify the titel too: [p6]  say variable in Class