SYNOPSIS
( )
package MyClass::Foo;
use base qw( Class:Accessor );
__PACKAGE__->mk_ro_accessors(qw( jacob michael joshua ethan ));
package MyClass::Bar;
use base qw( Class:Accessor );
__PACKAGE__->mk_ro_accessors(qw( emily emma madison isabella ));
package MyClass::Baz;
use base qw( Class:Accessor );
__PACKAGE__->mk_ro_accessors(qw( haruka haruto miyu yuto ));
( )
package MyClass; use base qw( Class::Accessor::Children ); __PACKAGE__->mk_child_ro_accessors( Foo => [qw( jacob michael joshua ethan )], Bar => [qw( emily emma madison isabella )], Baz => [qw( haruka haruto miyu yuto )], );
DESCRIPTION
This module automagically generates child classes which have accessor/mutator methods.This module inherits to make accessors.
METHODS
This module provides the following methods in addition to all methods provided by .mk_child_accessors
MyClass->mk_child_accessors( Foo => \@fields, ... );
This generates a child class named which have accessor/mutator methods each named in .
mk_child_ro_accessors
MyClass->mk_child_ro_accessors( Bar => \@fields, ... );
This generates a child class named which have read-only accessors (ie. true accessors).
mk_child_wo_accessors
MyClass->mk_child_wo_accessors( Baz => \@fields, ... );
This generates a child class named which have write-only accessor (ie. mutators).