Decorator
- Add behavior or attributes to an object
- Use Class::Trait
- Can apply a trait to a single object
my $dog = Dog->new(); Class::Trait->apply( $dog, 'Talker' ); $dog->talk(); my $other_dog = Dog->new(); $other_dog->talk(); # kaboom
my $dog = Dog->new(); Class::Trait->apply( $dog, 'Talker' ); $dog->talk(); my $other_dog = Dog->new(); $other_dog->talk(); # kaboom
| Copyright © 2005-2006 David Rolsky |