line |
true |
false |
branch |
36
|
0 |
0 |
if (exists $$spec{'required'} and $$spec{'required'} and not exists $params{$field}) |
40
|
0 |
0 |
if (exists $$spec{'default'} and not defined $param) |
44
|
0 |
0 |
unless defined $param |
46
|
0 |
0 |
if (exists $$spec{'type'}) |
49
|
0 |
0 |
if (($$spec{'type'} & _SCALAR()) == _SCALAR() and not ref $param) |
52
|
0 |
0 |
if (($$spec{'type'} & _ARRAYREF()) == _ARRAYREF() and ref $param eq 'ARRAY') |
55
|
0 |
0 |
if (($$spec{'type'} & _HASHREF()) == _HASHREF() and ref $param eq 'HASH') |
58
|
0 |
0 |
if (($$spec{'type'} & _OBJECT()) == _OBJECT() and blessed $param) |
62
|
0 |
0 |
unless ($is_valid_type) |
67
|
0 |
0 |
if (exists $$spec{'isa'} and not UNIVERSAL::isa($param, $$spec{'isa'})) |
117
|
0 |
0 |
unless (exists $args{'dbh'} and UNIVERSAL::isa($args{'dbh'}, 'DBI::db')) |
121
|
0 |
0 |
unless (exists $args{'database'} and !ref($args{'database'}) || ref $args{'database'} eq 'ARRAY') |
158
|
0 |
0 |
if (ref $stuff) { } |
159
|
0 |
0 |
if (ref $stuff eq 'ARRAY') { } |
174
|
0 |
0 |
@{$$args{'schema'};} > 0 ? : |
180
|
0 |
0 |
$enable_schema_filter ? : |
184
|
0 |
0 |
unless exists $$def{'schema'} and exists $tables{$$def{'schema'}} |
186
|
0 |
0 |
unless $dbh->do($$def{'data'}) |
191
|
0 |
0 |
if exists $$_{'index'} and exists $$_{'refer'} |
200
|
0 |
0 |
unless exists $$def{'index'} and exists $tables{$$def{'refer'}} |
202
|
0 |
0 |
unless $dbh->do($$def{'data'}) |
212
|
0 |
0 |
@{$$args{$target};} > 0 ? : |
216
|
0 |
0 |
unless exists $$def{$target} and exists $targets{$$def{$target}} |
218
|
0 |
0 |
unless $dbh->do($$def{'data'}) |
248
|
0 |
0 |
if exists $$_{'trigger'} |
260
|
0 |
0 |
@{$$args{'schema'};} > 0 ? : |
263
|
0 |
0 |
unless exists $triggers{$$def{'refer'}} |
264
|
0 |
0 |
unless $dbh->do($$def{'data'}) |
292
|
0 |
0 |
unless ref $args{'fixture'} |
323
|
0 |
0 |
if (ref $stuff) { } |
324
|
0 |
0 |
if (ref $stuff eq 'ARRAY') { } |
325
|
0 |
0 |
if (ref $$stuff[0]) { } |
346
|
0 |
0 |
unless $dbh->do(sprintf('DELETE FROM %s', $schema)) |
365
|
0 |
0 |
if ($$opts{'bulk_insert'}) { } |
368
|
0 |
0 |
unless $dbh->do($stmt, undef, @bind) |
369
|
0 |
0 |
unless $dbh->commit |
375
|
0 |
0 |
unless $dbh->do($stmt, undef, @bind) |
377
|
0 |
0 |
unless $dbh->commit |