line |
true |
false |
branch |
136
|
0 |
1 |
unless @_ % 2 == 0 |
142
|
0 |
1 |
$params{'template'} ? : |
242
|
0 |
1 |
unless @_ % 2 == 0 |
283
|
0 |
0 |
unless @_ % 2 == 0 |
288
|
0 |
0 |
if ($params{'dbh'}) { } |
291
|
0 |
0 |
unless $$self{'dbh'} = 'DBI'->connect("$params{'datasource'}", "$params{'username'}", "$params{'password'}", {'RaiseError', 1}) |
335
|
0 |
0 |
$params{'primary_key'} ? : |
368
|
0 |
0 |
if ($pk_val) |
397
|
0 |
0 |
$pk_val ? : |
407
|
0 |
0 |
unless $$self{'error'} |
427
|
0 |
0 |
if $$element{'type'} eq 'element' |
541
|
0 |
0 |
unless $o_type |
542
|
0 |
0 |
if $$element{'options'}[0][1] |
547
|
0 |
0 |
if ($o_type eq 'ARRAY') |
560
|
0 |
0 |
if ($o_type eq 'HASH') |
567
|
0 |
0 |
if ($o_type eq 'AOA') |
580
|
0 |
0 |
if ($o_type eq 'SQL') |
584
|
0 |
0 |
unless eval {
do {
$db_return = $$self{'dbh'}->selectall_arrayref($$element{'options'});
1
}
} |
617
|
0 |
0 |
if grep /$param/, @{$$self{'params'};} |
643
|
0 |
0 |
if ($$element{'type'} eq 'date') { } |
666
|
0 |
0 |
unless eval {
do {
$$self{'dbh'}->do($SQL, undef, @values);
1
}
} |
673
|
0 |
0 |
unless $$self{'error'} |
700
|
0 |
0 |
if ($$element{'type'} eq 'date') { } |
718
|
0 |
0 |
unless eval {
do {
$sth->execute(@values);
1
}
} |
720
|
0 |
0 |
unless $$self{'error'} |
740
|
0 |
0 |
unless eval {
do {
$sth->execute($$self{'query'}->param($$self{'pk'}));
1
}
} |
744
|
0 |
0 |
unless $$self{'error'} |
767
|
0 |
0 |
if ($$self{'err_handler'}) { } |
770
|
0 |
0 |
if $$self{'verbose'} |