Branch Coverage

lib/App/Followme/Web.pm
Criterion Covered Total %
branch 80 94 85.1


line true false branch
40 2 27 if $template_variables{$variable}
51 5927 2441 $token =~ /^<[^!]/ ? :
66 943 952 if (web_is_tag($token))
68 407 536 if (web_same_tag($matches[$in], $tag))
70 270 137 if ($in >= @matches)
77 137 133 unless $global
81 292 1466 if $in > 0
95 541 5 if (web_is_tag($token))
111 216 401 unless web_is_tag($token)
136 143 479 if ($token =~ /^<!--\s*section\s+(\w+).*?-->/) { }
143 336 elsif ($token =~ /^<!--\s*endsection\s+(\w+).*?-->/) { }
143 193 elsif (defined $name) { }
137 0 143 if (defined $name)
143 0 143 if ($name ne $1)
153 0 50 if $name
162 0 2767 unless web_is_tag($tag)
171 978 5078 if ($token eq '=') { }
884 4194 elsif ($token =~ /^"/) { }
178 5078 978 if (defined $token)
179 1333 3745 if (defined $pair[$side])
180 1333 0 if (defined $pair[0])
187 4100 978 if $side == 0
192 2767 0 if defined $pair[0]
194 0 2767 if (@pattern < 2 or defined $pattern[1])
211 0 2221 unless ref $match
212 0 2221 unless ref $tag
215 155 2345 unless exists $tag->{$name}
217 1543 802 if $value ne '*' and $tag->{$name} ne $value
230 464 4 if ($text)
250 170 574 if ($token =~ /^<!--\s*section\s+(\w+).*?-->/) { }
170 404 elsif ($token =~ /^\s*<!--\s*endsection\s+(\w+).*?-->/) { }
170 234 elsif (defined $name) { }
251 0 170 if (defined $name)
259 0 170 if ($name ne $1)
288 0 36 $global ? :
292 502 558 if (web_is_tag($token))
294 58 444 if (web_same_tag($matches[$in], $tag))
295 58 0 if $match_count
296 35 23 if ($in >= @matches)
306 46 1014 if ($in > 0) { }
313 0 36 if @tokens
331 772 708 if (web_is_tag($token))
333 56 716 if (web_same_tag($matches[$in], $tag))
335 28 28 if ($in >= @matches)
345 56 1424 if ($in > 0)
351 1396 84 if (defined $token and defined $title)
352 28 1368 unless exists $section{$title}