Branch Coverage

blib/lib/String/Expando.pm
Criterion Covered Total %
branch 14 58 24.1


line true false branch
18 0 1 if (defined $self->{'expando'}) { }
21 0 0 defined $2 ? :
0 0 $_ =~ /$rx/cg ? :
26 4 16 / \G \% ([^%()]*) \( ([^\s()]+) \) /cgx ? :
31 0 1 if (defined $self->{'literal'}) { }
34 0 0 $_ =~ /$rx/cg ? :
39 16 0 / \G (.) /cgx ? :
42 0 1 if (defined $self->{'escaped_literal'}) { }
45 0 0 $_ =~ /$rx/cg ? :
50 0 0 / \G \\ (.) /cgx ? :
59 0 0 @_ > 1 ? :
60 0 0 @_ > 1 ? :
74 4 16 if (my($code, $fmt) = &$mat()) { }
0 16 elsif (not defined($res = &$lit) || defined($res = &$esc)) { }
76 2 2 unless defined $res
77 0 4 if defined $fmt and length $fmt
91 0 4 if ref $val eq 'CODE'
92 0 4 if ref $val eq 'ARRAY'
102 0 0 if $rval eq 'HASH'
115 0 0 if (defined $f) { }
0 0 elsif ($rval eq 'HASH') { }
0 0 elsif ($rval eq 'ARRAY') { }
116 0 0 unless $func->{$f}
120 0 0 if defined $l or defined $r
124 0 0 if defined $k
125 0 0 defined $r ? :
132 0 0 if length $code
133 0 0 if $rval eq 'ARRAY'
134 0 0 if $rval eq 'HASH'