Branch Coverage

blib/lib/Array/Set.pm

Criterion	Covered	Total	%
branch	150	190	78.9

line	true	false	branch
19	12	0	if (ref $_[0] eq 'HASH') { }
33	4	8	if ($ar)
42	6	18	if ($op eq 'union') { }
	6	12	elsif ($op eq 'intersect') { }
	6	6	elsif ($op eq 'diff') { }
	6	0	elsif ($op eq 'symdiff') { }
44	6	0	if ($ign) { }
48	3	1	defined $_ ? :
	3	4	ref $_ ? :
	7	8	$ar ? :
49	3	12	if ($k eq 'R') { }
	11	1	elsif (defined $_) { }
52	7	4	$ic ? :
53	4	7	if $ib
56	11	4	unless exists $res{$k}
59	3	3	if ($i == @_)
65	0	0	if ($i == @_)
72	6	0	if ($ign) { }
73	3	3	if ($i == 1) { }
77	2	0	defined $_ ? :
	2	2	ref $_ ? :
	4	4	$ar ? :
78	2	6	if ($k eq 'R') { }
	6	0	elsif (defined $_) { }
81	2	4	$ic ? :
82	4	2	if $ib
85	8	0	unless exists $res{$k}
91	2	0	defined $_ ? :
	1	2	ref $_ ? :
	3	4	$ar ? :
92	1	6	if ($k eq 'R') { }
	6	0	elsif (defined $_) { }
95	2	4	$ic ? :
96	4	2	if $ib
99	4	3	if ($res{$k} and $res{$k}[0] == $i - 1)
105	3	3	if ($i == @_)
110	0	0	if ($i == 1) { }
114	0	0	if ($res{$_} and $res{$_} == $i - 1)
120	0	0	if ($i == @_)
127	6	0	if ($ign) { }
128	3	3	if ($i == 1) { }
132	2	0	defined $_ ? :
	2	2	ref $_ ? :
	4	4	$ar ? :
133	2	6	if ($k eq 'R') { }
	6	0	elsif (defined $_) { }
136	2	4	$ic ? :
137	4	2	if $ib
140	8	0	unless exists $res{$k}
146	2	0	defined $_ ? :
	1	2	ref $_ ? :
	3	4	$ar ? :
147	1	6	if ($k eq 'R') { }
	6	0	elsif (defined $_) { }
150	2	4	$ic ? :
151	4	2	if $ib
158	3	3	if ($i == @_)
162	0	0	if ($i == 1) { }
170	0	0	if ($i == @_)
177	6	0	if ($ign) { }
178	3	3	if ($i == 1) { }
182	2	0	defined $_ ? :
	2	2	ref $_ ? :
	4	4	$ar ? :
183	2	6	if ($k eq 'R') { }
	6	0	elsif (defined $_) { }
186	2	4	$ic ? :
187	4	2	if $ib
190	8	0	unless exists $res{$k}
196	2	0	defined $_ ? :
	1	2	ref $_ ? :
	3	4	$ar ? :
197	1	6	if ($k eq 'R') { }
	6	0	elsif (defined $_) { }
200	2	4	$ic ? :
201	4	2	if $ib
204	3	4	if (not $res{$k}) { }
	4	0	elsif ($res{$k}[0] <= 2) { }
212	3	3	if ($i == @_)
217	0	0	if ($i == 1) { }
221	0	0	if (not $res{$_} or $res{$_} <= 2)
227	0	0	if ($i == @_)
241	3	3	ref $_[0] eq 'HASH' ? :
242	3	3	if ($opts->{'ignore_case'} or $opts->{'ignore_blanks'} or $opts->{'allow_refs'}) { }
252	4	6	unless $set2{$el}
261	3	3	ref $_[0] eq 'HASH' ? :
262	3	3	if ($opts->{'ignore_case'} or $opts->{'ignore_blanks'} or $opts->{'allow_refs'}) { }
275	3	7	unless $set2{$el}
279	3	9	unless $set1{$el}
288	3	3	ref $_[0] eq 'HASH' ? :
289	3	3	if ($opts->{'ignore_case'} or $opts->{'ignore_blanks'} or $opts->{'allow_refs'}) { }
297	12	9	unless $mem{$el}++
305	3	3	ref $_[0] eq 'HASH' ? :
306	3	3	if ($opts->{'ignore_case'} or $opts->{'ignore_blanks'} or $opts->{'allow_refs'}) { }
316	8	3	if $set2{$el}