| line |
true |
false |
branch |
|
1149
|
7 |
39 |
if (@_) |
|
1151
|
0 |
6 |
unless $self->is_column($col) |
|
1160
|
37 |
8 |
@$vals ? : |
|
1163
|
45 |
0 |
unless ($propname =~ /non/) |
|
1165
|
45 |
0 |
unless $self->$nonprop |
|
1181
|
36 |
2 |
if @_ |
|
1182
|
36 |
2 |
if @_ |
|
1224
|
0 |
16 |
if ($init{'discover'}) { } |
|
|
0 |
16 |
elsif ($init{'non_primary_columns'}) { } |
|
1225
|
0 |
0 |
unless $init{'definition'} = $self->discover_columns($init{'name'}) |
|
1227
|
0 |
0 |
ref $init{'primary_column'} ? : |
|
1228
|
0 |
0 |
unless $init{'definition'} = $self->discover_columns($init{'name'}, (@primary, @{$init{'non_primary_columns'};})) |
|
1246
|
0 |
0 |
if (@_) |
|
1252
|
0 |
0 |
$self->_attributes_to_create ? : |
|
1543
|
0 |
0 |
unless my $type = shift() |
|
1544
|
0 |
0 |
unless my $col = shift() |
|
1548
|
0 |
0 |
if (defined $$db_write_translation{$col}) |
|
1549
|
0 |
0 |
if (defined $$db_write_translation{$col}{$type}) { } |
|
|
0 |
0 |
elsif (defined $$db_write_translation{$col}{'A'}) { } |
|
1609
|
0 |
0 |
unless my $value = shift() |
|
1611
|
0 |
0 |
if $self->is_column($value) |
|
1613
|
0 |
0 |
if $value =~ /^(\d+(\.\d+)?|\.\d+)(\s+(as|AS)\s*.+)?$/ |
|
1615
|
0 |
0 |
if $value =~ /^(['"]).*\1(\s+(as|AS)\s*.+)?$/ |
|
1617
|
0 |
0 |
if $value =~ /^[a-zA-Z]+\(.*\)(\s+(as|AS)\s*.+)?$/ |
|
1899
|
0 |
0 |
unless my $type = shift() |
|
1900
|
0 |
0 |
unless my(@cols) = @_ |
|
1906
|
0 |
0 |
if (defined $$db_write_translation{$col}) { } |
|
1907
|
0 |
0 |
if (defined $$db_write_translation{$col}{$type}) { } |
|
|
0 |
0 |
elsif (defined $$db_write_translation{$col}{'A'}) { } |
|
1920
|
0 |
0 |
wantarray ? : |
|
1972
|
0 |
0 |
unless my(@cols) = @_ |
|
1977
|
0 |
0 |
if (defined $$db_read_translation{$col}) { } |
|
1984
|
0 |
0 |
wantarray ? : |
|
2048
|
0 |
45 |
unless my(@cols) = @_ |
|
2055
|
15 |
30 |
if defined $$aliases{$col} |
|
2059
|
45 |
0 |
wantarray ? : |
|
2123
|
0 |
0 |
unless my $col = shift() |
|
2129
|
0 |
0 |
if (defined $rev{$col}) { } |
|
2220
|
0 |
0 |
if (my $bindables = $self->_cached_bindables->{'insert'}) { } |
|
2402
|
0 |
0 |
if (my $bindables = $self->_cached_bindables->{'update'}) { } |
|
2633
|
0 |
0 |
if (@cols) { } |
|
2635
|
0 |
0 |
unless $self->is_column($col) |
|
2762
|
0 |
0 |
if (@cols) |
|
2764
|
0 |
0 |
unless $self->is_column($col) |
|
2769
|
0 |
0 |
unless @cols |
|
2890
|
0 |
0 |
if (@cols) { } |
|
2892
|
0 |
0 |
unless $self->is_column($col) |
|
3055
|
0 |
0 |
if (@cols) { } |
|
3057
|
0 |
0 |
unless $self->is_selectable($col) |
|
3396
|
0 |
0 |
unless defined $init{'tables'} |
|
3398
|
0 |
0 |
unless ref $init{'tables'} eq 'ARRAY' |
|
3399
|
0 |
0 |
unless ref $init{'cols'} eq 'ARRAY' |
|
3401
|
0 |
0 |
if (@{$init{'tables'};} == 1) |
|
3405
|
0 |
0 |
unless my $joined_tables = $class->join_tables(@{$init{'tables'};}) |
|
3409
|
0 |
0 |
if ($init{'omit_columns_from_tables'}) |
|
3413
|
0 |
0 |
unless (@{$init{'cols'};}) |
|
3415
|
0 |
0 |
if ($init{'use_aliases'}) { } |
|
3417
|
0 |
0 |
if $omit{$table->name} |
|
3422
|
0 |
0 |
if $omit{$table->name} |
|
3581
|
0 |
0 |
if (my $def = $self->referenced_column($column)) { } |
|
3637
|
0 |
6 |
unless my $col = shift() |
|
3640
|
6 |
8 |
if $column eq $col |
|
3701
|
0 |
0 |
unless my $col = shift() |
|
3705
|
0 |
0 |
if $primaries{$col} |
|
3840
|
0 |
0 |
if (not ref $primary) { } |
|
|
0 |
0 |
elsif (ref $primary) { } |
|
3950
|
0 |
0 |
unless my $foreign_table = shift() |
|
3952
|
0 |
0 |
@_ ? : |
|
4022
|
0 |
0 |
unless my $column = shift() |
|
4056
|
0 |
0 |
unless my $table = shift() |
|
4058
|
0 |
0 |
@_ ? : |
|
4063
|
0 |
0 |
unless (my $stmt = $self->arbitrary_sql('query', "select $columns from $table where 1 = 0", 'iterator', 1)) |
|
4064
|
0 |
0 |
if ($columns) { } |
|
4076
|
0 |
0 |
unless $stmt->finish |
|
4156
|
0 |
0 |
unless my $query = shift() |
|
4159
|
0 |
0 |
unless (keys %$clauses) |
|
4164
|
0 |
0 |
if defined $$clauses{'having'} and not defined $$clauses{'group by'} |
|
4168
|
0 |
0 |
if (defined $$clauses{$clause}) |
|
4548
|
0 |
0 |
unless my $first_table = shift @tables |
|
4550
|
0 |
0 |
if (ref $first_table eq 'ARRAY') |
|
4551
|
0 |
0 |
ref $$first_table[0] ? : |
|
4564
|
0 |
0 |
if (ref $table eq 'ARRAY') |
|
4565
|
0 |
0 |
if (@$table == 3) { } |
|
|
0 |
0 |
elsif (@$table == 2) { } |
|
4567
|
0 |
0 |
unless ref $cols |
|
4569
|
0 |
0 |
if (not ref $$table[0]) { } |
|
4573
|
0 |
0 |
unless ref $cols |
|
4582
|
0 |
0 |
if (@$cols == 0 and $join ne 'natural') |
|
4590
|
0 |
0 |
if (@foreign_cols) |
|
4598
|
0 |
0 |
if (@last_foreign_cols) |
|
4605
|
0 |
0 |
unless ($found) |
|
4611
|
0 |
0 |
if @$cols |
|
4638
|
0 |
0 |
unless my $column = shift() |
|
4641
|
0 |
0 |
unless my(@columns) = @_ |
|
4643
|
0 |
0 |
if (ref $columns[-1] eq 'ARRAY') |
|
4644
|
0 |
0 |
if @columns == 2 |
|
4645
|
0 |
0 |
unless @columns = @{$columns[-1];} |
|
4650
|
0 |
0 |
$negative ? : |
|
4738
|
0 |
0 |
unless my(@cols) = @_ |
|
4739
|
0 |
0 |
unless my $name = $self->name |
|
4742
|
0 |
0 |
if index($column, '.') != -1 |
|
4746
|
0 |
0 |
wantarray ? : |
|
4774
|
0 |
45 |
unless my $column = shift() |
|
4880
|
0 |
0 |
unless my $tables = shift() |
|
4881
|
0 |
0 |
unless my(@clauses) = @_ |
|
4890
|
0 |
0 |
if (ref $clause eq 'ARRAY') |
|
4891
|
0 |
0 |
unless my(@subvalues) = $class->construct_where_clause($tables, @$clause) |
|
4901
|
0 |
0 |
if (ref $value eq 'HASH') { } |
|
4910
|
0 |
0 |
if ($clause =~ /^(\w+)\.(\w+)$/) |
|
4916
|
0 |
0 |
if (defined $t->definition->{$t->column_for_alias($clause)}) |
|
4917
|
0 |
0 |
if (not defined $name or $name eq $t->name) |
|
4924
|
0 |
0 |
unless defined $table |
|
4933
|
0 |
0 |
if (ref $value eq 'ARRAY') { } |
|
4935
|
0 |
0 |
if (ref $$value[-1] eq 'ARRAY') { } |
|
4941
|
0 |
0 |
if (ref $value) { } |
|
4951
|
0 |
0 |
if @mywhere > 1 |
|
4957
|
0 |
0 |
if (@extra) |
|
4961
|
0 |
0 |
if $where |