NAME
Eve::Item - a base class for item classes.
SYNOPSIS
package Eve::Item::Foo;
use parent qw(Eve::Item);
sub init {
my ($self, %arg_hash) = @_;
my $rest_hash = Eve::Support::arguments(
\%arg_hash, my $some_attribute);
$self->SUPER::init(%{$rest_hash});
$self->{'some_attribute'} = $some_attribute;
}
1;
my $foo = Eve::Item::Foo->new(
some_attribute => 'some value',
some_super_attribute => 'super value');
print $foo->some_attribute, $foo->some_super_attribute
DESCRIPTION
Eve::Item is a base class for item classes. It is assumed to represent the data part of an object.
METHODS
eq()
Arguments
item
-
a
Eve::Item
derivative object that needs to be compared with the current one.
SEE ALSO
LICENSE AND COPYRIGHT
Copyright 2012 Igor Zinovyev.
This program is free software; you can redistribute it and/or modify it under the terms of either: the GNU General Public License as published by the Free Software Foundation; or the Artistic License.
See http://dev.perl.org/licenses/ for more information.