Branch Coverage

blib/lib/Text/PORE/template_lexer.pl
Criterion Covered Total %
branch 38 48 79.1


line true false branch
29 348 157 if (defined $string)
54 190 175 if ($INTAG) { }
58 53 137 if ($lexer_buffer =~ s/^$TAG_PREFIX.(\w+)//is) { }
17 120 elsif ($lexer_buffer =~ s[^/][]s) { }
33 87 elsif ($lexer_buffer =~ s/^(\w+)//s) { }
15 72 elsif ($lexer_buffer =~ s/^=\s*([\.\w]+)//s) { }
0 72 elsif ($lexer_buffer =~ s/^=\s*([\'\"])\1//s) { }
18 54 elsif ($lexer_buffer =~ s/^=\s*([\'\"])(([^\\]|\\.)*?)\1//s) { }
53 1 elsif ($lexer_buffer =~ s/^>//s) { }
0 1 elsif ($lexer_buffer =~ s/^
60 28 25 if ($yylval eq 'if') { }
3 22 elsif ($yylval eq 'else') { }
2 20 elsif ($yylval eq 'context') { }
0 20 elsif ($yylval eq 'link') { }
4 16 elsif ($yylval eq 'list') { }
16 0 elsif ($yylval eq 'render') { }
0 0 elsif ($yylval eq 'ref') { }
0 0 elsif ($yylval eq 'table') { }
93 53 122 if (defined $lexer_buffer and $lexer_buffer =~ s[^<(?=/?$TAG_PREFIX\.)][]is) { }
73 49 elsif (defined $lexer_buffer and $lexer_buffer =~ s[^.+?(?=
105 315 50 if ($lexer_token) { }
115 6 44 unless (defined $input and length $input)
117 0 6 if ($lexer_buffer) { }
126 44 0 if defined $input