Me just learing Perl OO With Moose