Branch Coverage

blib/lib/BBCode/Tag.pm
Criterion Covered Total %
branch 56 74 75.6


line true false branch
79 209 61 if ($pkg eq 'BBCode::Tag')
85 1 269 unless $parser->isPermitted($tag)
92 183 0 if ref $v and UNIVERSAL::isa($v, 'ARRAY')
93 155 28 if not defined $k or $k eq ''
94 1 182 unless defined $k
109 139 130 if ($this->BodyPermitted)
113 139 0 if ($this->BodyTags) { }
129 199 0 if (exists $$this{'body'})
131 0 583 if $$this{'forbid'}->contains($_)
132 197 386 if $$this{'permit'}->contains($_)
140 68 129 if (exists $$this{'body'})
142 68 0 if (@_ == 1 and UNIVERSAL::isa($_[0], 'BBCode::TagSet')) { }
150 0 0 unless $this->isPermitted($child)
159 406 146 if (exists $$this{'body'}) { }
160 287 119 if wantarray
163 16 130 if wantarray
178 0 199 unless $this->BodyPermitted
181 199 0 if (ref $tag) { }
182 0 199 unless UNIVERSAL::isa($tag, 'BBCode::Tag')
186 2 197 unless $this->isPermitted($tag)
196 22 546 if not defined $param or $param eq ''
197 0 568 unless defined $param
199 1 567 unless exists $$this{'params'}{$param}
201 182 385 if (@_)
212 0 110 unless exists $$this{'params'}{$k}
214 35 75 if defined $v
216 78 0 if wantarray
234 11 3 if ($follow or $this->parser->follow_override)
237 3 8 if defined $f
246 0 8 if ($nwo)
249 0 0 if defined $user
262 23 33 if (@p)
268 16 19 if (defined $def and $def eq $k) { }
281 54 2 if ($this->BodyPermitted)
294 0 0 if ($this == $that) { }
309 1 25 unless defined $ret
313 1 25 if wantarray