Branch Coverage

blib/lib/Set/Toolkit.pm
Criterion Covered Total %
branch 49 82 59.7


line true false branch
22 1 76 if (@_)
23 1 0 $_[0] ? :
26 33 44 unless exists $$self{$field}
44 23 101 if (not exists $$self{'_data'} or ref $$self{'_data'} ne 'ARRAY')
65 165 12 unless (exists $lookup{$el})
82 0 0 if ($self->is_ordered) { }
95 8 0 if ($self->is_unique) { }
103 54 3 unless (exists $lookup{$data[$i]})
125 0 0 if ($self->is_unique) { }
133 0 0 unless (exists $lookup{$data[$i]})
157 1 23 if ($self->is_ordered) { }
166 17 0 if ($self->is_unique) { }
179 24 0 if ($self->is_unique) { }
202 0 4 if (ref $a and not ref $b or ref $b and not ref $a)
208 4 0 unless (ref $a or ref $b)
213 0 0 if (ref $a ne ref $b)
228 2 2 if (_items_match($el, $self->_data->[$i]))
234 2 0 if $self->is_unique
257 0 4 if (scalar @_ == 1 and ref $_[0] eq 'HASH') { }
1 3 elsif (scalar @_ == 1) { }
274 6 14 if (_obj_matches_properties($obj, $condition))
288 0 7 if (scalar @_ == 1 and ref $_[0] eq 'HASH') { }
6 1 elsif (scalar @_ == 1) { }
303 4 26 if (_obj_matches_properties($obj, $condition))
318 30 20 if (not ref $opt) { }
9 11 elsif (not ref $obj) { }
319 18 12 if (not ref $obj) { }
335 0 11 if (ref $$opt{$field} eq 'HASH') { }
336 0 0 unless (_obj_matches_properties($$obj{$field}, $$opt{$field}))
352 11 0 if ($@) { }
355 11 0 if (exists $$obj{$field}) { }
366 0 11 if (not defined $opt_version || defined $obj_version) { }
0 11 elsif (not defined $opt_version && defined $obj_version) { }
5 6 elsif ($opt_version ne $obj_version) { }
394 1 1 $self->size ? :
417 0 0 $self->size ? :
427 0 4 unless my $isa = $self->isa('Set::Toolkit')
430 0 4 if $@
450 0 25 if @_
493 0 0 if ($index >= scalar @indecies) { }
529 0 0 defined $els[$index] ? :