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 6427 2601 $token =~ /^<[^!]/ ? :
66 1083 1092 if (web_is_tag($token))
68 487 596 if (web_same_tag($matches[$in], $tag))
70 330 157 if ($in >= @matches)
77 157 173 unless $global
81 332 1686 if $in > 0
95 631 5 if (web_is_tag($token))
111 236 441 unless web_is_tag($token)
136 168 562 if ($token =~ /^<!--\s*section\s+(\w+).*?-->/) { }
168 394 elsif ($token =~ /^<!--\s*endsection\s+(\w+).*?-->/) { }
168 226 elsif (defined $name) { }
137 0 168 if (defined $name)
143 0 168 if ($name ne $1)
153 0 58 if $name
162 0 2997 unless web_is_tag($tag)
171 1178 5808 if ($token eq '=') { }
1064 4744 elsif ($token =~ /^"/) { }
178 5808 1178 if (defined $token)
179 1633 4175 if (defined $pair[$side])
180 1633 0 if (defined $pair[0])
187 4630 1178 if $side == 0
192 2997 0 if defined $pair[0]
194 0 2997 if (@pattern < 2 or defined $pattern[1])
211 0 2361 unless ref $match
212 0 2361 unless ref $tag
215 178 2543 unless exists $tag->{$name}
217 1580 963 if $value ne '*' and $tag->{$name} ne $value
230 524 4 if ($text)
250 178 601 if ($token =~ /^<!--\s*section\s+(\w+).*?-->/) { }
178 423 elsif ($token =~ /^\s*<!--\s*endsection\s+(\w+).*?-->/) { }
178 245 elsif (defined $name) { }
251 0 178 if (defined $name)
259 0 178 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}