Branch Coverage

web/cgi-bin/yatt.lib/YATT/LRXML/EntityPath.pm
Criterion Covered Total %
branch 69 90 76.6


line true false branch
39 0 50 unless defined $_[0] and ref $_[0] eq 'ARRAY'
41 48 2 unless defined $item->[0] and ref $item->[0] eq 'ARRAY'
42 2 0 unless defined $_[0]
43 0 0 if defined $item->[0][0]
51 2 0 if ($TRANS and $NODE) { }
62 1 271 unless defined $orig
68 271 0 if (wantarray) { }
73 1 269 if ($_ ne '')
76 269 0 wantarray ? :
89 6 310 if (s/^ \[ //x) { }
17 293 elsif (s/^ \{ //x) { }
96 96 265 if ($2) { }
239 26 elsif (defined $1) { }
24 2 elsif (defined $3) { }
2 0 elsif (defined $4) { }
110 315 0 wantarray ? :
129 8 161 if (s/^,//x)
132 12 149 if (my $is_expr = s/^=//)
136 45 104 if (not s/^$re_text//) { }
142 106 59 if defined $1
143 0 165 if defined $4
144 4 161 if (my $opn = $2 || $3) { }
59 102 elsif (not defined $1 || defined $4) { }
161 0 12 if (s/^,//x)
167 18 9 if defined $1
168 1 26 if defined $4
169 12 15 if (my $opn = $2 || $3) { }
4 11 elsif (not defined $1 || defined $4) { }
184 127 144 if (s/^ ([\)\]\}])//x)
185 0 127 if $1 ne $close
189 0 143 if ($cnt and $len == length $_)
190 0 0 defined $close ? :
192 138 5 @pipe <= 1 ? :
202 19 28 if (s/^ ([\)\]\}])//x)
203 0 19 if $1 ne $close
207 22 6 if (s/^($re_word | , )//x) { }
4 2 elsif (s/^([\(\[\{])//) { }
213 1 27 if (defined $prev and $prev == length $_)
223 17 25 if (s/^ ([\)\]\}])//x)
224 0 17 if $1 ne '}'
228 25 0 if (s/^([\w\.\-]+) [:=] //x or s/^($re_other+) ,?//x)
231 0 25 $str =~ s/^:// ? :
234 1 24 @value > 1 ? :
235 0 25 unless (length $_ < $len)
240 0 17 if (@hash - 1) % 2