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) ? : |