Branch Coverage

blib/lib/Xtract/Scan.pm
Criterion Covered Total %
branch 23 36 63.8


line true false branch
23 0 4 unless my $driver = &Params::Util::_DRIVER("Xtract::Scan::$name", 'Xtract::Scan')
40 0 4 unless (&Params::Util::_INSTANCE($self->dbh, 'DBI::db'))
97 0 1 unless ($sth)
120 6 0 if (defined $value) { }
122 3 3 if ($i == 0 and $$hash{'UNIQUE'})
130 3 3 if (&Params::Util::_NONNEGINT($value))
132 1 2 if (not defined $$hash{'INTMIN'} or $value < $$hash{'INTMIN'})
135 3 0 if (not defined $$hash{'INTMAX'} or $value > $$hash{'INTMAX'})
139 3 3 if (defined &Params::Util::_NUMBER($value))
142 6 0 if (length $value <= 255)
154 0 2 $$hash{'NULL'} ? :
155 0 2 if ($$hash{'NOTNULL'} == 0) { }
1 1 elsif ($$hash{'INTEGER'} == $$hash{'NOTNULL'}) { }
0 1 elsif ($$hash{'NUMBER'} == $$hash{'NOTNULL'}) { }
1 0 elsif ($$hash{'TEXT'} == $$hash{'NOTNULL'}) { }
160 1 0 if ($i == 0 and $$hash{'UNIQUE'})
162 1 0 if ($d == $$hash{'NOTNULL'})
198 0 1 scalar grep({$_;} @bind) ? :