Branch Coverage

blib/lib/BBCode/TagSet.pm
Criterion Covered Total %
branch 13 24 54.1


line true false branch
13 13 302 if @_
33 174 265 if (ref $arg) { }
34 174 0 if (UNIVERSAL::isa($arg, 'BBCode::TagSet')) { }
0 0 elsif (UNIVERSAL::isa($arg, 'BBCode::Tag')) { }
0 0 elsif (ref $arg eq 'HASH') { }
0 0 elsif (ref $arg eq 'ARRAY') { }
0 0 elsif (ref $arg eq 'SCALAR' or ref $arg eq 'REF') { }
51 171 94 if ($arg =~ /^(!?)(:\w+)$/) { }
94 0 elsif ($arg =~ /^(!?)(\w+)$/) { }
53 158 13 $1 eq '' ? :
56 94 0 $1 eq '' ? :
87 467 2452 if exists $$this{$tag}