Branch Coverage

blib/lib/Perl/Lint/Policy/Subroutines/ProhibitExcessComplexity.pm
Criterion Covered Total %
branch 10 12 83.3


line true false branch
22 5 0 if ($token_type == 63)
31 25 257 if ($token_type == 109) { }
25 232 elsif ($token_type == 110) { }
53 179 elsif ($token_type == 52 or $token_type == 53 or $token_type == 16 or $token_type == 14 or $token_type == 18 or $token_type == 57 or $token_type == 58 or $token_type == 6 or $token_type == 96 or $token_type == 98 or $token_type == 97 or $token_type == 99 or $token_type == 132 or $token_type == 100 or $token_type == 133 or $token_type == 134 or $token_type == 26 or $token_type == 27) { }
35 0 25 if (--$left_brace_num < 0)
63 3 2 if ($mccabe > $max_mccabe)