- or download this
package Parent;
use Moose;
...
use strict;
}
1;
- or download this
package Child;
use Moose;
...
use strict;
}
1;
- or download this
#!/usr/bin/perl -w
use strict;
...
use Child;
my $child = Child->new();
- or download this
$ ./testchild.pl
BUILD called for Parent
Creating builder for attribute [knuisje]
BUILD called for Child
Creating builder for attribute [knuisje]