| Name : perl-Class-Data-Accessor
| |
| Version : 0.04004
| Vendor : obs://build_opensuse_org/devel:languages:perl
|
| Release : 1.1
| Date : 2013-10-16 04:32:51
|
| Group : Development/Libraries/Perl
| Source RPM : perl-Class-Data-Accessor-0.04004-1.1.src.rpm
|
| Size : 0.02 MB
| |
| Packager : (none)
| |
| Summary : Inheritable, overridable class and instance data accessor creation
|
Description :
*This module is now deprecated!*
Please consider using the Class::Accessor::Grouped manpage or the Moose
manpage
Class::Data::Accessor is the marriage of the Class::Accessor manpage and
the Class::Data::Inheritable manpage into a single module. It is used for
creating accessors to class data that overridable in subclasses as well as
in class instances.
For example:
Pere::Ubu->mk_classaccessor(\'Suitcase\');
will generate the method Suitcase() in the class Pere::Ubu.
This new method can be used to get and set a piece of class data.
Pere::Ubu->Suitcase(\'Red\');
$suitcase = Pere::Ubu->Suitcase;
Taking this one step further, you can make a subclass that inherits from
Pere::Ubu:
package Raygun;
use base qw(Pere::Ubu);
$suitcase = Raygun->Suitcase;
Raygun inherits its Suitcase class data from Pere::Ubu.
Inheritance of class data works analogous to method inheritance. As long as
Raygun does not \"override\" its inherited class data (by using Suitcase() to
set a new value) it will continue to use whatever is set in Pere::Ubu and
inherit further changes:
Pere::Ubu->Suitcase(\'Blue\');
However, should Raygun decide to set its own Suitcase() it has now
\"overridden\" Pere::Ubu and is on its own, just like if it had overridden a
method:
Raygun->Suitcase(\'Orange\');
Now that Raygun has overridden Pere::Ubu, further changes by Pere::Ubu no
longer effect Raygun.
Pere::Ubu->Suitcase(\'Samsonite\');
You can also override this class data on a per-object basis. If $obj isa
Pere::Ubu then
$obj->Suitcase; # will return Samsonite
$obj->Suitcase(\'Purple\'); # will set Suitcase *for this object only*
And after you\'ve done that,
$obj->Suitcase; # will return Purple
but
Pere::Ubu->Suitcase; # will still return Samsonite
If you don\'t want this behaviour use the Class::Data::Inheritable manpage
instead.
\'mk_classaccessor\' will die if used as an object method instead of as a
class method.
|
RPM found in directory: /packages/linux-pbone/ftp5.gwdg.de/pub/opensuse/repositories/devel:/languages:/perl/openSUSE_13.1/noarch |
Hmm ... It's impossible ;-) This RPM doesn't exist on any FTP server
Provides :
perl(Class::Data::Accessor)
perl-Class-Data-Accessor
Requires :
