Branch Coverage

blib/lib/Perl/Lint/Policy/ValuesAndExpressions/ProhibitLongChainsOfMethodCalls.pm
Criterion Covered Total %
branch 10 10 100.0


line true false branch
17 2 7 if (my $this_policies_arg = $args->{'prohibit_long_chains_of_method_calls'})
25 104 495 if ($token_type == 125) { }
46 449 elsif ($token_type == 106 or $token->{'kind'} == 17) { }
28 16 88 if ($next_token_type == 109 or $next_token_type == 111)
36 12 34 if ($num_of_chain > $max_chain_length)