blib/lib/SQL/Abstract/More.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 54 | 95 | 56.8 |
line | l | !l | condition | |
---|---|---|---|---|
381 | 2 | 0 | 0 | exists $args{$_} and &puke("-page_size conflicts with $_") |
593 | 16 | 0 | 0 | $args{$_} and &puke("insert(-into => .., -values => ...) : cannot use $_ => ") |
938 | 32 | 3 | $item =~ s/^-// and $item = {'-desc', $item} |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
33 | 10 | 0 | 3 | @_ >= 2 and $_[0] eq '-extends' |
363 | 0 | 58 | 5 | @cols and $cols[0] =~ s/^-// |
451 | 0 | 0 | 1 | $join_info && $join_info->{'aliased_tables'} |
1025 | 0 | 0 | 0 | &does($val, 'ARRAY') and my($bind_meth, @args) = $self->is_bind_value_with_type($val) |
1046 | 0 | 2 | 5 | @$val == 2 and &does($val->[0], 'HASH') |
2 | 1 | 4 | @$val == 2 and &does($val->[0], 'HASH') and grep {$val->[0]{$_};} 'dbd_attrs', 'sqlt_size', 'sqlt_datatype', 'dbic_colname' | |
1080 | 56 | 0 | 12 | &does($table_arg, 'ARRAY') and $table_arg->[0] eq '-join' |
1141 | 7 | 0 | 34 | $cmp and $right |
1243 | 4 | 1 | 18 | $max_members_IN and &does($vals, 'ARRAY') |
5 | 14 | 4 | $max_members_IN and &does($vals, 'ARRAY') and @$vals > $max_members_IN | |
1323 | 0 | 0 | 2 | &does($vals, 'ARRAY') and @$vals |
1447 | 0 | 4 | 83 | $_[0] && !ref($_[0]) && substr($_[0], 0, 1) eq '-' |
line | l | !l | condition |
---|---|---|---|
30 | 0 | 13 | $ENV{'SQL_ABSTRACT_MORE_EXTENDS'} || 'SQL::Abstract' |
604 | 2 | 0 | $SQL::Abstract::VERSION || 0 |
696 | 0 | 0 | shift() || (return) |
1113 | 8 | 23 | $op ||= '<=>' |
1114 | 23 | 8 | $bracket ||= '{' |
1115 | 30 | 1 | $cond_list ||= '' |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
89 | 88 | 0 | 102 | defined $reft && $reft eq $type || &blessed($data) && overload::Method($data, $meth_for{$type}) |
244 | 0 | 7 | 0 | $more_params{$_} ||= $dialect_params->{$_} |
253 | 16 | 2 | 0 | not $params{'quote_char'} or exists $params{'name_sep'} |
379 | 1 | 0 | 57 | $args{'-page_index'} or $args{'-page_size'} |
401 | 19 | 3 | 0 | $sub_args{$_} ||= $args{$_} |
475 | 0 | 1 | 0 | $self->{'array_datatypes'} or $self->is_bind_value_with_type($v) |
527 | 0 | 0 | 0 | $self->{'array_datatypes'} or $self->is_bind_value_with_type($v) |
671 | 0 | 1 | 0 | $self->{'array_datatypes'} || $self->is_bind_value_with_type($v) |
748 | 0 | 0 | 0 | $self->{'array_datatypes'} or $self->is_bind_value_with_type($v) |
772 | 0 | 0 | 0 | @rest or not $op =~ /^\-(.+)/ |
937 | 2 | 32 | 35 | not $item or ref $item |
1098 | 13 | 51 | 0 | $alias || $table |
1144 | 1 | 6 | 27 | $right =~ /\./ or $right eq $placeholder |