Branch Coverage

blib/lib/MDOM/Token.pm
Criterion Covered Total %
branch 8 36 22.2


line true false branch
50 852 6 if (@_ == 2) { }
6 0 elsif (@_ == 3) { }
53 4 848 if ($_[0] eq 'MDOM::Token') { }
59 852 0 defined $_[0] ? :
65 0 6 substr($_[0], 0, 12) eq 'MDOM::Token::' ? :
66 6 0 defined $_[2] ? :
83 0 0 unless @_
84 0 0 substr($_[0], 0, 12) eq 'MDOM::Token::' ? :
87 0 0 ref($self) =~ /\b(?:Quote|Regex)\b/o ? :
88 0 0 $class =~ /\b(?:Quote|Regex)\b/o ? :
96 0 0 if $old_quote - $new_quote == 0
100 0 0 unless my $token = $class->new($$self{'content'})
164 0 0 unless my $Element = _INSTANCE(shift(), 'MDOM::Element')
165 0 0 if ($Element->isa('MDOM::Structure')) { }
0 0 elsif ($Element->isa('MDOM::Token')) { }
176 0 0 unless my $Element = _INSTANCE(shift(), 'MDOM::Element')
177 0 0 if ($Element->isa('MDOM::Structure')) { }
0 0 elsif ($Element->isa('MDOM::Token')) { }