blib/lib/DBIx/Custom.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 105 | 155 | 67.7 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
103 | 0 | 0 | 511 | not ref $connector and $connector |
133 | 0 | 0 | 4064 | ref $connector and $connector->can('dbh') |
188 | 54 | 164 | 3 | @_ % 2 != 0 and not ref $_[0] |
208 | 0 | 221 | 0 | $model->columns and @{$model->columns;} |
552 | 506 | 0 | 16 | @_ > 0 and not ref $_[0] |
506 | 13 | 3 | @_ > 0 and not ref $_[0] and $_[0] =~ /:/ | |
597 | 0 | 1787 | 927 | defined $quote and length $quote > 1 |
768 | 786 | 0 | 38 | defined $opt{'id'} and not $multi |
935 | 994 | 840 | 75 | $type_rule->{$into} and my $filter = $type_rule->{$into}{$type_name} |
939 | 0 | 66 | 9 | defined $filter and ref $filter ne 'CODE' |
965 | 0 | 59 | 3 | defined $fname and ref $fname ne 'CODE' |
1092 | 65 | 0 | 0 | defined $re and $table =~ /$re/ |
1178 | 0 | 1731 | 904 | defined $quote and length $quote > 1 |
1354 | 0 | 0 | 157 | defined $table1 and defined $table2 |
1491 | 0 | 3 | 27 | $self->{'dbh'} and my $dbh_method = $self->dbh->can($mname) |
1524 | 3 | 0 | 15 | defined $opt{'id'} and defined $opt{'primary_key'} |
line | l | !l | condition |
---|---|---|---|
83 | 70 | 0 | $columns ||= [] |
197 | 164 | 57 | delete $opt->{'model_class'} || 'DBIx::Custom::Model' |
225 | 1810 | 1387 | $param ||= {} |
257 | 123 | 11 | $opt{'table'} || [] |
270 | 12 | 250 | $opt{'table_alias'} || {} |
366 | 0 | 0 | $ENV{'DBIX_CUSTOM_DEBUG_ENCODING'} || 'UTF-8' |
405 | 60 | 0 | $name_space ||= '' |
556 | 3 | 0 | shift() || {} |
557 | 3 | 0 | shift() || {} |
593 | 2714 | 0 | $self->{'quote'} || $self->quote || '' |
595 | 2714 | 0 | substr($quote, 0, 1) || '' |
639 | 6 | 736 | delete $opt{'param'} || {} |
676 | 735 | 0 | $found_tables->[-1] || '' |
680 | 6 | 729 | join(' ', keys %$param) || '' |
740 | 824 | 0 | $params ||= {} |
817 | 86 | 3 | $param ||= {} |
862 | 3 | 824 | $opts->{'wrap'} || {} |
889 | 3 | 92 | $opts->{'wrap'} || {} |
977 | 188 | 0 | $self->{'type_rule'} || {} |
1069 | 222 | 129 | $columns ||= [] |
1174 | 2635 | 0 | $self->{'quote'} || $self->quote || '' |
1176 | 2635 | 0 | substr($quote, 0, 1) || '' |
1194 | 0 | 0 | $opts->{'wrap'} || {} |
1281 | 585 | 0 | $append ||= '' |
1377 | 316 | 0 | $self->quote || '' |
1415 | 371 | 518 | $where ||= {} |
1490 | 30 | 9 | $self->{'_methods'} ||= {} |
1525 | 0 | 15 | $opt{'option'} || {} |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
67 | 9 | 61 | 0 | $option->{'alias'} || $real_table |
70 | 18 | 12 | 40 | not defined $columns or $columns eq '*' |
140 | 4058 | 0 | 0 | $self->{'dbh'} ||= $self->_connect |
161 | 29 | 15 | 30 | $opt{'where'} or defined $opt{'id'} |
15 | 27 | 3 | $opt{'where'} or defined $opt{'id'} or $opt{'allow_delete_all'} | |
200 | 167 | 54 | 0 | $model_name ||= $model_table |
322 | 39 | 146 | 3009 | defined $filter || defined $type_filters |
428 | 30 | 30 | 20 | $file eq '.' or $file eq '..' |
459 | 9 | 0 | 0 | $model_name ||= $model_class |
460 | 0 | 9 | 0 | $model_table ||= $model_name |
536 | 0 | 9 | 24 | not $columns or $columns eq '*' |
653 | 6 | 46 | 0 | $opt{'mytable_symbol'} || $self->mytable_symbol |
752 | 23 | 10 | 791 | defined $opt{'ctime'} or defined $opt{'mtime'} |
821 | 68 | 15 | 6 | $opt{'where'} or defined $opt{'id'} |
15 | 3 | 3 | $opt{'where'} or defined $opt{'id'} or $opt{'allow_update_all'} | |
1021 | 0 | 0 | 16 | $self->exclude_table || $options{'exclude_table'} |
1087 | 0 | 0 | 19 | $self->exclude_table || $option{'exclude'} |