Branch Coverage

blib/lib/App/Framework/Base/Object.pm

Criterion	Covered	Total	%
branch	289	378	76.4

line	true	false	branch
112	1	164	if $global_debug
113	0	162	if $global_debug >= 2
134	0	162	if $global_debug
153	0	162	if $global_debug >= 3
163	162	0	if exists $FIELD_LIST{$class}
174	987	2332	if (ref $val eq 'ARRAY') { }
	441	1891	elsif (ref $val eq 'HASH') { }
191	0	486	if (exists $args{$special})
204	0	162	if $global_debug >= 3
225	0	162	if $global_debug >= 3
228	148	14	unless ($CLASS_INIT{$class})
234	0	148	if $global_debug >= 4
237	148	0	if ($fields)
239	0	148	if $global_debug >= 4
244	0	148	if (ref $fields eq 'ARRAY') { }
	148	0	elsif (ref $fields eq 'HASH') { }
273	2760	315	unless ($class->can($field))
286	2779	296	unless ($class->can("undef_$field"))
300	0	148	if $global_debug >= 4
302	5	4	@_ ? :
	5	4	@_ ? :
	2	4	@_ ? :
	5	4	@_ ? :
	84	112	@_ ? :
	43	366	@_ ? :
	42	322	@_ ? :
	57	0	@_ ? :
	57	85	@_ ? :
	26	1238	@_ ? :
	26	1149	@_ ? :
	30	62	@_ ? :
	232	37	@_ ? :
	15	30	@_ ? :
	232	335	@_ ? :
	232	664	@_ ? :
	232	0	@_ ? :
	26	220	@_ ? :
	28	47	@_ ? :
	30	111	@_ ? :
	28	137	@_ ? :
	27	137	@_ ? :
	26	307	@_ ? :
	21	111	@_ ? :
	7	327	@_ ? :
	27	249	@_ ? :
	6	335	@_ ? :
	42	189	@_ ? :
	0	15	@_ ? :
	102	70	@_ ? :
	29	350	@_ ? :
	26	66	@_ ? :
	27	25	@_ ? :
	28	20	@_ ? :
	26	45	@_ ? :
	28	72	@_ ? :
	2	15	@_ ? :
	5	44	@_ ? :
	58	202	@_ ? :
	23	18	@_ ? :
	39	24	@_ ? :
	27	87	@_ ? :
	29	25	@_ ? :
	26	31	@_ ? :
	27	25	@_ ? :
	28	10	@_ ? :
	21	27	@_ ? :
	37	237	@_ ? :
	26	424	@_ ? :
	52	194	@_ ? :
	52	15	@_ ? :
	52	16	@_ ? :
	56	24	@_ ? :
	57	21	@_ ? :
	42	5	@_ ? :
	36	324	@_ ? :
	77	230	@_ ? :
	37	36	@_ ? :
	42	36	@_ ? :
	39	48	@_ ? :
	36	41	@_ ? :
	32	21	@_ ? :
	32	194	@_ ? :
	30	204	@_ ? :
	63	335	@_ ? :
	56	47	@_ ? :
	52	52	@_ ? :
	52	30	@_ ? :
	56	50	@_ ? :
	44	25	@_ ? :
	26	52	@_ ? :
	56	43	@_ ? :
	54	88	@_ ? :
	54	32	@_ ? :
	52	40	@_ ? :
	54	101	@_ ? :
	43	9	@_ ? :
	2	20	@_ ? :
	17	15	@_ ? :
	20	35	@_ ? :
	232	17	@_ ? :
	32	786	@_ ? :
	26	371	@_ ? :
	60	106	@_ ? :
	44	133	@_ ? :
	52	58	@_ ? :
	49	69	@_ ? :
	52	63	@_ ? :
	35	56	@_ ? :
	28	195	@_ ? :
	26	220	@_ ? :
	26	195	@_ ? :
	0	15	@_ ? :
	35	26	@_ ? :
	37	42	@_ ? :
	44	27	@_ ? :
	40	30	@_ ? :
	31	21	@_ ? :
	29	90	@_ ? :
	28	48	@_ ? :
	27	62	@_ ? :
	28	45	@_ ? :
	26	86	@_ ? :
	22	37	@_ ? :
	53	77	@_ ? :
	52	65	@_ ? :
	54	37	@_ ? :
	54	57	@_ ? :
	58	81	@_ ? :
	49	88	@_ ? :
	56	35	@_ ? :
	47	15	@_ ? :
	46	202	@_ ? :
	31	202	@_ ? :
	12	75	@_ ? :
	59	270	@_ ? :
	42	24	@_ ? :
	195	375	@_ ? :
	21	228	@_ ? :
303	0	148	if ($@)
312	0	148	if $global_debug >= 4
318	0	162	if $global_debug >= 3
401	0	0	if defined $flag
429	0	0	if defined $flag
451	0	0	if defined $flag
473	2	160	if ($class->allowed_class_instance and not $class->has_class_instance)
477	0	2	if $global_debug >= 3
535	0	0	if exists $FIELD_LIST{$class}
537	0	0	$href ? :
565	17	37920	if defined $level
616	0	211	if defined $level
662	34	0	if exists $FIELD_LIST{$class}
663	0	34	unless exists $field_list{$field}
665	19	15	if defined $value
693	0	611	if $global_debug >= 3
701	611	0	if exists $FIELD_LIST{$class}
705	4616	11407	if (exists $args{$field})
707	0	4616	if $global_debug >= 3
710	1068	3548	if (not defined $args{$field}) { }
724	0	611	if ($strict_fields)
729	0	0	unless (exists $field_list{$field})
737	0	611	if $global_debug >= 3
759	211	0	if exists $FIELD_LIST{$class}
766	211	0	unless (@names)
777	7130	0	if exists $names{$field}
830	0	795	unless (ref $this)
833	0	0	if ($class->has_class_instance) { }
871	0	0	if (exists $field_list{$field})
939	0	0	unless ($^O eq 'MSWin32')
977	0	0	if (defined $$vars_href{$1}) { }
1024	1170	36247	if ($obj->debug >= $min_debug)
1053	74	12	if ($subr)
1076	0	0	if ($global_debug >= 10)
1091	0	0	if exists $FIELD_LIST{$class}
1093	0	0	if (not exists $field_list{$field}) { }
1097	0	0	if $global_debug >= 5
1098	0	0	if $global_debug >= 10
1111	0	0	if $global_debug >= 5
1129	0	0	if ($global_debug >= 10)
1141	0	0	if exists $FIELD_LIST{$class}
1143	0	0	if (not exists $field_list{$field}) { }
1147	0	0	if $global_debug >= 5
1149	0	0	if $global_debug >= 10
1161	0	0	if $global_debug >= 5
1176	0	0	if $global_debug >= 5
1179	0	0	if ($global_debug >= 10)
1190	0	0	if (not ref $this or ref $this eq 'ARRAY')
1222	0	0	if defined $new_value
1225	0	0	if ($name =~ /^undef_(\w+)$/)
1234	0	0	if ($set)