|
NAMEClass::Accessor::Children::Fast - Faster, child-class/accessor generationSYNOPSISBEFORE (WITHOUT THIS)package MyClass::Foo; use base qw( Class:Accessor::Fast ); __PACKAGE__->mk_ro_accessors(qw( jacob michael joshua ethan )); package MyClass::Bar; use base qw( Class:Accessor::Fast ); __PACKAGE__->mk_ro_accessors(qw( emily emma madison isabella )); package MyClass::Baz; use base qw( Class:Accessor::Fast ); __PACKAGE__->mk_ro_accessors(qw( haruka haruto miyu yuto )); AFTER (WITH THIS) package MyClass; use base qw( Class::Accessor::Children::Fast ); __PACKAGE__->mk_child_ro_accessors( Foo => [qw( jacob michael joshua ethan )], Bar => [qw( emily emma madison isabella )], Baz => [qw( haruka haruto miyu yuto )], ); DESCRIPTIONThis module automagically generates child classes which have accessor/mutator methods.This module inherits "Class::Accessor::Fast" to make accessors. METHODSThis module provides the following methods in addition to all methods provided by "Class::Accessor::Fast".mk_child_accessorsMyClass->mk_child_accessors( Foo => \@fields, ... ); This generates a child class named "MyClass::Foo" which have accessor/mutator methods each named in "\@fields". mk_child_ro_accessorsMyClass->mk_child_ro_accessors( Bar => \@fields, ... ); This generates a child class named "MyClass::Bar" which have read-only accessors (ie. true accessors). mk_child_wo_accessorsMyClass->mk_child_wo_accessors( Baz => \@fields, ... ); This generates a child class named "MyClass::Baz" which have write-only accessor (ie. mutators). SEE ALSOClass::Accessor::ChildrenClass::Accessor::Fast AUTHORYusuke Kawasaki <http://www.kawa.net/>COPYRIGHT AND LICENSECopyright (c) 2007 Yusuke Kawasaki. All rights reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
Visit the GSP FreeBSD Man Page Interface. |