Branch Coverage

blib/lib/HDB/Parser.pm
Criterion Covered Total %
branch 0 120 0.0


line true false branch
33 0 0 if ($where eq '')
37 0 0 $nowhere ? :
0 0 if (ref $where and $#where <= 1 and $where[1] eq '') { }
0 0 elsif (ref $where eq 'ARRAY' and $#where >= 1) { }
41 0 0 ref $where[0] eq 'SCALAR' ? :
0 0 ref $where[0] eq 'ARRAY' ? :
46 0 0 unless $op =~ /^(?:AND|OR)$/
50 0 0 if ($cond =~ /^\s*\(?\s*\?\s*\)?\s*$/s) { }
61 0 0 if $parser ne ''
68 0 0 if ($nowhere) { }
72 0 0 $this ? :
75 0 0 $nowhere ? :
0 0 if (defined $CACHE{$where_id})
86 0 0 if $parse =~ /\S$/s
88 0 0 if ($cond[0] =~ /^(?:AND|OR)$/)
95 0 0 if $cond ne '' and $parse =~ /\S$/s
97 0 0 if ($cond =~ /^\s*(?:AND|OR)\s*$/i) { }
0 0 elsif ($cond =~ /\S/s) { }
99 0 0 if (not $lnk_last =~ /\w/ and $parse =~ /\S/)
100 0 0 if ($cond =~ /\s(?:AND|OR)\s/) { }
112 0 0 unless $nowhere
137 0 0 unless ($conds_i =~ /\S/s)
138 0 0 if ($conds_i =~ /^\s*(?:and|&&?)\s*$/s) { }
0 0 elsif ($conds_i =~ /^\s*(?:or|\|\|)\s*$/s) { }
145 0 0 if ($cond =~ /^(?:!=|<>|ne)$/s) { }
0 0 elsif ($cond =~ /^(?:<=|=<)$/s) { }
0 0 elsif ($cond =~ /^(?:>=|=>)$/s) { }
0 0 elsif ($cond =~ /^>$/s) { }
0 0 elsif ($cond =~ /^<$/s) { }
0 0 elsif ($cond =~ /^=~$/s) { }
0 0 elsif ($cond =~ /^!~$/s) { }
0 0 elsif ($cond =~ /^(?:==?|eq)$/s) { }
154 0 0 if ($cond =~ /REGEXP/ and $this and not $$this{'SQL'}{'REGEXP'})
155 0 0 if ($$this{'SQL'}{'LIKE'}) { }
173 0 0 if (wantarray) { }
185 0 0 if (ref $$blk_ref[$i] eq 'ARRAY')
211 0 0 if ($blk eq '(') { }
0 0 elsif ($blk eq ')') { }
212 0 0 unless ($b{'o'})
218 0 0 if ($b{'o'} > 1)
224 0 0 if ($b{'o'} <= 0)
229 0 0 if ($b{'d'} =~ /\(.*?\)/s) { }
240 0 0 if ($string =~ /.*[\(\)](.*?)$/s) { }
268 0 0 if ($init =~ /\\$/)
273 0 0 if (not $q{'o'}) { }
279 0 0 if (substr($string, 0, 1) eq $quote)
288 0 0 if ($quote eq $q{'q'}) { }
322 0 0 if (not $val =~ /^[\-\+]?(\d+|\d+\.\d+)$/s || $quotes && $val =~ /^%q_\d+%$/s || $val =~ /^(?:NULL)$/is and $val ne '')
323 0 0 if $quotes
335 0 0 if ($val eq '')
378 0 0 if $quotes
380 0 0 if ($regex =~ /^"(.*?)"$/) { }
0 0 elsif ($regex =~ /^'(.*?)'$/) { }
383 0 0 if ($cond =~ /not/i) { }
386 0 0 if ($regex =~ /^\^/ and $regex =~ /\$$/) { }
0 0 elsif ($regex =~ /^\^/) { }
0 0 elsif ($regex =~ /\$$/) { }
418 0 0 unless $_[0] =~ /\0/s
437 0 0 unless $_[0] =~ /^($b1$b2+$b1):/s
451 0 0 if (@keys > 1000)