- bullseye 0.31-4.1
|Class::Trait::Base(3pm)||User Contributed Perl Documentation||Class::Trait::Base(3pm)|
Class::Trait::Base - Base class for all Traits
This class needs to be inherited by all traits so they can be identified as traits.
use Class::Trait 'base';
Not much going on here, just an AUTOLOAD method to help properly dispatch calls to "SUPER::" and an "apply" method.
require TSomeTrait; TSomeTrait->apply($object);
This method allows you to apply a trait to an object. It returns the trait so you can then reapply it:
This is merely syntactic sugar for the "Class::Trait::apply" method:
Class::Trait->apply($dog_object, 'TTricks'); Class::Trait->apply($cat_object, 'TTricks');
Curtis "Ovid" Poe, "<ovid [at] cpan [dot] org>"
Stevan Little <email@example.com>
COPYRIGHT AND LICENSE¶
Copyright 2004, 2005 by Infinity Interactive, Inc.
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.