Branch Coverage

blib/lib/Perl/Lint/Policy/Modules/ProhibitExcessMainComplexity.pm
Criterion Covered Total %
branch 11 12 91.6


line true false branch
25 1 347 if ($token_type == 63) { }
80 267 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) { }
28 8 103 if ($token_type == 109) { }
8 95 elsif ($token_type == 110) { }
32 0 8 if (--$left_brace_num < 0)
62 3 4 if ($mccabe > $max_mccabe)