Branch Coverage

blib/lib/Perl/Lint/Policy/ErrorHandling/RequireCheckingReturnValueOfEval.pm

Criterion	Covered	Total	%
branch	74	74	100.0

line	true	false	branch
27	29	690	if ($token_type == 65) { }
	23	667	elsif ($token_type == 104) { }
	14	653	elsif ($token_type == 107) { }
	97	556	elsif ($token_type == 109) { }
	11	545	elsif ($token_type == 111) { }
	14	531	elsif ($token_type == 108) { }
	96	435	elsif ($token_type == 110) { }
	11	424	elsif ($token_type == 112) { }
	1	423	elsif ($token_type == 70 and $token_data eq 'grep') { }
	36	387	elsif (not $assigned || $is_in_grep and $token_type == 70 and $token_data eq 'eval') { }
	28	359	elsif ($token_type == 96) { }
	21	338	elsif ($token_type == 134 or $token_type == 132) { }
	12	326	elsif ($token_type == 133) { }
	75	251	elsif ($token_type == 106 or not $$tokens[$i + 1]) { }
31	17	4	if ($left_paren_num <= 0 and $left_brace_num <= 0 and $left_bracket_num <= 0)
75	37	229	if ($token_type == 109) { }
	43	186	elsif ($token_type == 110) { }
	2	184	elsif ($token_type == 6) { }
	8	176	elsif ($left_brace_num <= 0 and $token_type == 52 || $token_type == 53 || $token_type == 16 || $token_type == 14) { }
	36	140	elsif ($left_brace_num <= 0 and $token_type == 106 or not $$tokens[$j + 1]) { }
104	26	8	unless ($is_ternary or $is_proper)
125	30	224	if ($token_type == 70 and $token->{'data'} eq 'eval') { }
	22	202	elsif ($token_type == 104) { }
	41	161	elsif ($token_type == 107) { }
	41	120	elsif ($token_type == 108) { }
134	16	6	if ($next_token_type != 104 and $next_token_type != 108)
148	8	21	if ($last_token->{'type'} != 70 and $last_token->{'data'} ne 'eval' and $exists_eval_global || $exists_eval and $exists_comma)
166	1	226	if ($left_paren_num <= 0 and $left_paren_found or $token == 106 or not $$tokens[$i + 1])
185	26	161	if ($token_type == 107) { }
	26	135	elsif ($token_type == 108) { }
193	1	166	if ($left_paren_num <= 0 and $left_paren_found or $token == 106 or not $$tokens[$i + 1])
211	4	141	if ($token_type == 65) { }
	16	125	elsif ($token_type == 107) { }
	16	109	elsif ($token_type == 108) { }
	31	78	elsif ($token_type == 106) { }
	4	107	elsif (not $assigned and $block & 1 and $token_type == 70 and $token->{'data'} eq 'eval') { }
240	12	133	if ($left_paren_num <= 0 and $left_paren_found)