sub add { my $self = shift; my $thing = shift; my $collection = $self->{collection}; return undef if $collection->contains($thing); return $collection->add($thing); }