Branch Coverage

blib/lib/Perl/Lint/Policy/ValuesAndExpressions/ProhibitConstantPragma.pm

Criterion	Covered	Total	%
branch	3	4	75.0

line	true	false	branch
19	7	43	if ($token_type == 93)
21	7	0	if ($$next_token{'type'} == 94 and $$next_token{'data'} eq 'constant')