Branch Coverage

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

Criterion	Covered	Total	%
branch	289	378	76.4

line	true	false	branch
112	1	173	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	@_ ? :
	29	157	@_ ? :
	26	154	@_ ? :
	28	272	@_ ? :
	28	137	@_ ? :
	21	74	@_ ? :
	7	327	@_ ? :
	27	249	@_ ? :
	6	335	@_ ? :
	42	189	@_ ? :
	0	15	@_ ? :
	102	70	@_ ? :
	27	349	@_ ? :
	26	63	@_ ? :
	27	27	@_ ? :
	28	30	@_ ? :
	27	40	@_ ? :
	28	64	@_ ? :
	3	20	@_ ? :
	5	44	@_ ? :
	58	202	@_ ? :
	23	19	@_ ? :
	39	24	@_ ? :
	28	54	@_ ? :
	27	21	@_ ? :
	26	50	@_ ? :
	26	32	@_ ? :
	28	20	@_ ? :
	23	30	@_ ? :
	37	235	@_ ? :
	26	424	@_ ? :
	52	194	@_ ? :
	56	21	@_ ? :
	52	12	@_ ? :
	54	9	@_ ? :
	54	28	@_ ? :
	43	11	@_ ? :
	36	324	@_ ? :
	77	230	@_ ? :
	38	38	@_ ? :
	37	36	@_ ? :
	38	46	@_ ? :
	40	36	@_ ? :
	33	21	@_ ? :
	32	199	@_ ? :
	30	204	@_ ? :
	63	345	@_ ? :
	56	30	@_ ? :
	58	30	@_ ? :
	52	92	@_ ? :
	52	32	@_ ? :
	42	15	@_ ? :
	26	47	@_ ? :
	58	37	@_ ? :
	55	28	@_ ? :
	54	52	@_ ? :
	52	40	@_ ? :
	52	104	@_ ? :
	42	51	@_ ? :
	2	21	@_ ? :
	17	15	@_ ? :
	20	35	@_ ? :
	232	17	@_ ? :
	32	786	@_ ? :
	26	371	@_ ? :
	57	147	@_ ? :
	53	68	@_ ? :
	48	73	@_ ? :
	44	96	@_ ? :
	49	61	@_ ? :
	41	40	@_ ? :
	28	195	@_ ? :
	26	220	@_ ? :
	26	195	@_ ? :
	0	15	@_ ? :
	36	38	@_ ? :
	37	27	@_ ? :
	39	27	@_ ? :
	41	26	@_ ? :
	35	23	@_ ? :
	28	88	@_ ? :
	29	51	@_ ? :
	27	37	@_ ? :
	27	72	@_ ? :
	27	94	@_ ? :
	21	31	@_ ? :
	55	47	@_ ? :
	54	47	@_ ? :
	52	98	@_ ? :
	54	47	@_ ? :
	56	78	@_ ? :
	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	37882	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	36208	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)