Help for this page

Select Code to Download


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