lib/Petal/Tiny.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 36 | 46 | 78.2 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
52 | 0 | 1 | 13 | defined $thing and $thing =~ /(\<|\n|\>)/ |
254 | 0 | 2 | 1 | $last && $idx == $#$array |
264 | 3 | 13 | 7 | $last && $idx == $#$array |
349 | 123 | 212 | 7 | not @path and @args == 1 |
362 | 123 | 212 | 1 | not @path and @args |
371 | 20 | 0 | 0 | ref $arg and $self->reftype($arg) eq 'ARRAY' |
422 | 173 | 0 | 197 | my($has_close, $tag) = $elem =~ m[ \A < ( /? ) ( [A-Za-z0-9] [A-Za-z0-9_:-]* ) ]x and my($has_self_close) = $elem =~ m[ ( /? ) > \z ]x |
459 | 82 | 0 | 10 | $1 eq 'xmlns' and $attr{$key} eq 'http://purl.org/petal/1.0/' |
line | l | !l | condition |
---|---|---|---|
405 | 9 | 33 | $$quotes{$_} || '"' |
456 | 101 | 0 | $1 || '"' |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
49 | 0 | 14 | 0 | ref $class || $class |
93 | 173 | 11 | 93 | $$node{'_simple'} or $$node{'_selfclose'} |
229 | 1 | 1 | 1 | $stuff eq '' or $self->resolve_expression($stuff, $context) |
265 | 7 | 5 | 11 | $$context{'repeat'}{'start'} || $$context{'repeat'}{'end'} |
428 | 10 | 94 | 0 | $node{'_ns'} ||= $ns |
487 | 51 | 10 | 169 | not $string or ref $string |