Select Code to Download

my $M = Person->new( name => 'A', sex => 'please' );
print $M->dump;

$VAR1 = bless( {
                 'sex' => 'please'
               }, 'Person' );

C:\>perl -MMoose -e "print $Moose::VERSION"
0.22
...
C:\>perl -v

This is perl, v5.8.8 built for MSWin32-x86-multi-thread