Branch Coverage

blib/lib/Perl/Tags/Naive/Moose.pm
Criterion Covered Total %
branch 14 22 63.6


line true false branch
43 1 35 if ($statement =~ /extends\s+["']?((?:\w+|::)+)\b/)
60 2 34 if ($statement =~ /\bwith\s+(?:qw.)?\W*([a-zA-Z0-9_: ]+)/)
82 2 34 if ($statement =~ /\bhas\s+["']?(\w+)\b/)
103 0 36 if ($statement =~ /around\s+["'](\w+)\b/)
124 0 36 if ($statement =~ /before\s+["'](\w+)\b/)
145 0 36 if ($statement =~ /after\s+["'](\w+)\b/)
166 0 36 if ($statement =~ /override\s+["'](\w+)\b/)
187 0 36 if ($statement =~ /augment\s+["']?(\w+)\b/)
208 0 36 if ($statement =~ /class\s+(\w+)\b/)
229 0 36 if ($statement =~ /method\s+(\w+)\b/)
250 0 36 if ($statement =~ /role\s+(\w+)\b/)