/ 
ONTO-PERL-1.08
River stage zero No dependents
/ OBO::Util::DbxrefSet

NAME

OBO::Util::DbxrefSet - A DbxrefSet implementation

SYNOPSIS

use OBO::Util::DbxrefSet; use OBO::Core::Dbxref; use strict;

my $my_set = OBO::Util::DbxrefSet->new;

# three new dbxref's my $ref1 = OBO::Core::Dbxref->new; my $ref2 = OBO::Core::Dbxref->new; my $ref3 = OBO::Core::Dbxref->new;

$ref1->name("CCO:vm"); $ref2->name("CCO:ls"); $ref3->name("CCO:ea");

# remove from my_set $my_set->remove($ref1); $my_set->add($ref1); $my_set->remove($ref1);

### set versions ### $my_set->add($ref1); $my_set->add($ref2); $my_set->add($ref3);

my $ref4 = OBO::Core::Dbxref->new; my $ref5 = OBO::Core::Dbxref->new; my $ref6 = OBO::Core::Dbxref->new;

$ref4->name("CCO:ef"); $ref5->name("CCO:sz"); $ref6->name("CCO:qa");

$my_set->add_all($ref4, $ref5, $ref6);

$my_set->add_all($ref4, $ref5, $ref6);

# remove from my_set $my_set->remove($ref4);

my $ref7 = $ref4; my $ref8 = $ref5; my $ref9 = $ref6;

my $my_set2 = OBO::Util::DbxrefSet->new;

$my_set->add_all($ref4, $ref5, $ref6); $my_set2->add_all($ref7, $ref8, $ref9, $ref1, $ref2, $ref3);

$my_set2->clear();

DESCRIPTION

A set (OBO::Util::Set) of dbxref (OBO::Core::Dbxref) elements.

AUTHOR

Erick Antezana, <erant@psb.ugent.be>

COPYRIGHT AND LICENSE

Copyright (C) 2006, 2007 by erant

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8.7 or, at your option, any later version of Perl 5 you may have available.

equals

Usage    - $set->equals($another_dbxref_set)
Returns  - either 1 (true) or 0 (false)
Args     - the set (OBO::Util::DbxrefSet) to compare with
Function - tells whether this set is equal to the given one