The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

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

Eve::Class
Eve::Exception

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.

AUTHOR

Igor Zinovyev