Branch Coverage

blib/lib/Switcheroo.pm
Criterion Covered Total %
branch 14 50 28.0


line true false branch
36 69 8 defined $expr ? :
45 10 67 if ($comparator)
60 8 123 if ($type eq 'block') { }
71 33 124 &$match($var, $term) ? :
76 37 94 if $matched
79 38 2 if ($default)
94 0 0 if (lex_peek() eq '(')
100 0 0 unless lex_peek() eq ')'
105 0 0 if (lex_peek(4) eq 'mode')
109 0 0 unless lex_peek() eq '('
114 0 0 unless lex_peek() eq ')'
119 0 0 if (lex_peek(2) eq 'do')
126 0 0 unless lex_peek() eq '{'
137 0 0 if (lex_peek(7) eq 'default')
141 0 0 if (lex_peek() eq ':')
150 0 0 unless lex_peek() eq '}'
163 0 0 if (lex_peek(1) eq '/') { }
0 0 elsif (lex_peek(2) =~ /m\W/u) { }
179 0 0 if (lex_peek() eq '(') { }
0 0 elsif (lex_peek() eq '{') { }
185 0 0 unless lex_peek() eq ')'
204 0 0 unless lex_peek() eq ':'
218 27 0 if $munge
226 6 0 if $munge
239 0 0 lex_peek() eq '{' ? :