Branch Coverage

blib/lib/Class/Accessor/Complex.pm

Criterion	Covered	Total	%
branch	136	246	55.2

line	true	false	branch
17	14	0	unless @args
22	0	36	if defined &DB::DB and not $Devel::DProf::VERSION
27	0	36	ref $this_class ? :
31	0	36	scalar(@_ == 1) && ref $_[0] eq 'HASH' ? :
34	0	36	if $self->can('init')
59	1	0	unless @args
65	0	3	if defined &DB::DB and not $Devel::DProf::VERSION
67	2	1	if defined $singleton
71	0	1	ref $this_class ? :
77	0	1	scalar(@_ == 1) && ref $_[0] eq 'HASH' ? :
80	0	1	if $singleton->can('init')
111	0	14	if defined &DB::DB and not $Devel::DProf::VERSION
113	9	5	if @_ == 1
131	0	0	if defined &DB::DB and not $Devel::DProf::VERSION
155	0	5	if defined &DB::DB and not $Devel::DProf::VERSION
157	4	1	if @_ == 1
177	0	1	if defined &DB::DB and not $Devel::DProf::VERSION
204	1	1	if (ref $arg eq 'ARRAY')
210	0	11	if defined &DB::DB and not $Devel::DProf::VERSION
213	4	7	if (defined $text)
214	2	2	if (defined $$self{$field}) { }
239	0	2	if defined &DB::DB and not $Devel::DProf::VERSION
264	0	6	if defined &DB::DB and not $Devel::DProf::VERSION
267	1	5	unless defined $$self{$field}
268	0	4	ref $_ eq 'ARRAY' ? :
269	1	5	if @list
271	5	1	wantarray ? :
294	0	1	if defined &DB::DB and not $Devel::DProf::VERSION
312	0	1	if defined &DB::DB and not $Devel::DProf::VERSION
331	0	0	if defined &DB::DB and not $Devel::DProf::VERSION
351	0	1	if defined &DB::DB and not $Devel::DProf::VERSION
370	0	0	if defined &DB::DB and not $Devel::DProf::VERSION
389	0	6	if defined &DB::DB and not $Devel::DProf::VERSION
391	5	1	exists $_[0]{$field} ? :
408	0	1	if defined &DB::DB and not $Devel::DProf::VERSION
444	0	3	if defined &DB::DB and not $Devel::DProf::VERSION
448	2	1	if @indices == 1
449	1	0	wantarray ? :
473	0	0	if defined &DB::DB and not $Devel::DProf::VERSION
477	0	0	if @args % 2
509	0	16	if defined &DB::DB and not $Devel::DProf::VERSION
512	0	4	ref $_ eq 'ARRAY' ? :
	1	15	if @list
514	15	1	wantarray ? :
540	0	1	if defined &DB::DB and not $Devel::DProf::VERSION
561	0	1	if defined &DB::DB and not $Devel::DProf::VERSION
581	0	0	if defined &DB::DB and not $Devel::DProf::VERSION
602	0	1	if defined &DB::DB and not $Devel::DProf::VERSION
622	0	0	if defined &DB::DB and not $Devel::DProf::VERSION
642	0	6	if defined &DB::DB and not $Devel::DProf::VERSION
662	0	1	if defined &DB::DB and not $Devel::DProf::VERSION
701	0	3	if defined &DB::DB and not $Devel::DProf::VERSION
705	2	1	if @indices == 1
706	1	0	wantarray ? :
733	0	0	if defined &DB::DB and not $Devel::DProf::VERSION
737	0	0	if @args % 2
769	0	9	if defined &DB::DB and not $Devel::DProf::VERSION
772	0	9	unless defined $$self{$field}
773	3	6	if (scalar @list == 1) { }
775	2	1	if (my $type = ref $key) { }
776	1	1	if ($type eq 'ARRAY') { }
	1	0	elsif ($type eq 'HASH') { }
783	0	1	wantarray ? :
795	6	4	unless defined $key
797	0	4	unless defined $value
800	4	2	wantarray ? :
837	0	1	if defined &DB::DB and not $Devel::DProf::VERSION
857	0	3	if defined &DB::DB and not $Devel::DProf::VERSION
876	0	3	if defined &DB::DB and not $Devel::DProf::VERSION
895	0	1	if defined &DB::DB and not $Devel::DProf::VERSION
914	0	3	if defined &DB::DB and not $Devel::DProf::VERSION
917	3	0	if exists $$self{$field}
935	0	1	if defined &DB::DB and not $Devel::DProf::VERSION
961	0	10	if defined &DB::DB and not $Devel::DProf::VERSION
964	3	7	if (scalar @list == 1) { }
966	1	2	unless ref $key
967	1	1	if ref $key eq 'ARRAY'
968	1	0	if (ref $key eq 'HASH')
970	0	1	wantarray ? :
980	7	4	unless defined $key
982	0	4	unless defined $value
985	5	2	wantarray ? :
1025	0	1	if defined &DB::DB and not $Devel::DProf::VERSION
1044	0	3	if defined &DB::DB and not $Devel::DProf::VERSION
1064	0	1	if defined &DB::DB and not $Devel::DProf::VERSION
1084	0	3	if defined &DB::DB and not $Devel::DProf::VERSION
1105	0	1	if defined &DB::DB and not $Devel::DProf::VERSION
1132	0	1	if defined &DB::DB and not $Devel::DProf::VERSION
1136	1	0	if ($@) { }
1160	0	0	if defined &DB::DB and not $Devel::DProf::VERSION
1162	0	0	if @_ == 1
1163	0	0	$_[1] ? :
1181	0	0	if defined &DB::DB and not $Devel::DProf::VERSION
1198	0	0	if defined &DB::DB and not $Devel::DProf::VERSION
1221	0	9	if defined &DB::DB and not $Devel::DProf::VERSION
1224	7	2	unless @_
1243	0	2	if defined &DB::DB and not $Devel::DProf::VERSION
1260	0	2	if defined &DB::DB and not $Devel::DProf::VERSION
1277	0	2	if defined &DB::DB and not $Devel::DProf::VERSION
1302	0	2	if defined &DB::DB and not $Devel::DProf::VERSION
1305	1	1	if (@_) { }
1331	0	2	if defined &DB::DB and not $Devel::DProf::VERSION
1353	0	4	if defined &DB::DB and not $Devel::DProf::VERSION
1372	0	1	if defined &DB::DB and not $Devel::DProf::VERSION
1392	0	1	if defined &DB::DB and not $Devel::DProf::VERSION
1409	0	4	if defined &DB::DB and not $Devel::DProf::VERSION
1412	0	4	unless defined $key
1432	0	2	if defined &DB::DB and not $Devel::DProf::VERSION
1435	0	2	unless $$self{$field}
1451	0	4	if defined &DB::DB and not $Devel::DProf::VERSION
1454	0	4	unless $$self{$field}
1473	0	3	unless my $list = shift @args
1476	0	3	ref $list eq 'ARRAY' ? :
1479	2	1	if (not ref $obj_def) { }
1484	0	0	defined $composites ? :
	1	0	ref $composites eq 'ARRAY' ? :
1493	0	1	if defined &DB::DB and not $Devel::DProf::VERSION
1513	0	12	if defined &DB::DB and not $Devel::DProf::VERSION
1516	0	12	if (ref $args[0] and UNIVERSAL::isa($args[0], $type)) { }
1519	3	9	unless defined $$self{$name}
1548	0	0	if defined &DB::DB and not $Devel::DProf::VERSION
1569	1	1	ref $methods eq 'ARRAY' ? :
1574	0	3	if defined &DB::DB and not $Devel::DProf::VERSION