Branch Coverage

blib/lib/SQL/Concrete.pm
Criterion Covered Total %
branch 53 60 88.3


line true false branch
52 4 1 @$item ? :
10 1 keys %$item ? :
11 0 'HASH' eq $type ? :
44 11 'SQL::Concrete' eq $type ? :
5 55 'ARRAY' eq $type ? :
14 60 'SCALAR' eq $type ? :
22 74 !$type ? :
60 10 82 unless (defined $append)
69 6 1 'ARRAY' eq $type ? :
1 7 'SQL::Concrete' eq $type ? :
5 8 !$type ? :
1 13 !defined($rgt) ? :
71 4 2 @$rgt ? :
76 4 5 if keys %$item > 1
79 1 90 if "1 IN (0)" eq $append and $sql =~ s/\bNOT\s*\z//i
80 12 2 if $sql =~ /\S/ and not $append =~ /\A\s/ and not $sql =~ /=\z/
91 0 74 if $type and "SQL::Concrete" ne $type
92 13 61 $type ? :
100 0 2 unless @_
115 3 0 'HASH' eq $type ? :
4 3 'ARRAY' eq $type ? :
128 9 15 ref $_[0] ? :
130 1 23 unless @_
137 14 9 if ('ARRAY' eq $type0) { }
9 0 elsif ('HASH' eq $type0) { }
138 1 13 unless @$row0
142 1 8 unless keys %$row0
155 14 7 if (@alias)
157 0 14 defined $alias[0] ? :
166 0 5 if defined $prev