| blib/lib/DBIx/Class/ResultDDL.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 70 | 143 | 48.9 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 23 | 35 | 0 | 24 | $pkg->can("load_components") and $pkg->can("add_column") |
| 163 | 103 | 21 | 5 | @_ and ref $_[0] eq "ARRAY" |
| 170 | 7 | 1 | 11 | @_ and &Scalar::Util::looks_like_number($_[0]) |
| 174 | 12 | 29 | 3 | @_ and &Scalar::Util::looks_like_number($_[0]) || uc $_[0] eq 'MAX' |
| 180 | 6 | 0 | 17 | @_ and not ref $_[0] |
| 6 | 9 | 8 | @_ and not ref $_[0] and $_[0] =~ /(^floating$|^local$|[A-Z])/ | |
| 192 | 20 | 2 | 0 | @_ and &Scalar::Util::looks_like_number($_[0]) |
| 258 | 2 | 0 | 2 | @_ == 1 and $_[0] |
| 0 | 0 | 2 | @_ == 1 and $_[0] and not ref $_[0] | |
| 266 | 0 | 0 | 2 | $data_type_idx and $_[$data_type_idx] |
| 0 | 0 | 2 | $data_type_idx and $_[$data_type_idx] and not ref $_[$data_type_idx] | |
| 409 | 2 | 0 | 0 | $stash->{'sqlt_deploy_hook'} and $stash->{'sqlt_deploy_hook'}{'CODE'} |
| 477 | 136 | 0 | 17 | $opts->{'default_value'} and not defined $opts->{'retrieve_on_insert'} |
| 136 | 16 | 1 | $opts->{'default_value'} and not defined $opts->{'retrieve_on_insert'} and _settings_for_package($pkg)->{'retrieve_defaults'} | |
| 484 | 0 | 2 | 2 | !ref($maybe_colmap) && $maybe_colmap =~ /JOIN / |
| 540 | 0 | 0 | 12 | $rel_class and $direction |
| line | l | !l | condition |
|---|---|---|---|
| 93 | 36 | 25 | $_settings_for_package{shift()} ||= {} |
| 193 | 0 | 22 | $size || 11 |
| 220 | 1 | 2 | $size || 1 |
| 221 | 1 | 1 | $size || 1 |
| 240 | 0 | 0 | $size || 1073741823 |
| 472 | 1 | 8 | $dest->{$_} ||= {} |
| 511 | 0 | 0 | $direction ||= 1 |
| 515 | 0 | 1 | $direction ||= -1 |
| 525 | 0 | 0 | $direction ||= -1 |
| 529 | 0 | 11 | $direction ||= 1 |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 65 | 8 | 0 | 0 | ref $self || $self |
| 146 | 0 | 39 | 0 | $CALLER || caller |
| 154 | 0 | 133 | 0 | $CALLER || caller |
| 174 | 31 | 1 | 0 | &Scalar::Util::looks_like_number($_[0]) || uc $_[0] eq 'MAX' |
| 278 | 0 | 10 | 0 | $CALLER || caller |
| 283 | 0 | 1 | 0 | $CALLER || caller |
| 289 | 0 | 3 | 0 | $CALLER || caller |
| 296 | 0 | 21 | 0 | $CALLER || caller |
| 299 | 0 | 3 | 0 | $CALLER || caller |
| 303 | 0 | 1 | 0 | $CALLER || caller |
| 306 | 0 | 2 | 0 | $CALLER || caller |
| 309 | 0 | 2 | 0 | $CALLER || caller |
| 312 | 0 | 0 | 0 | $CALLER || caller |
| 315 | 0 | 4 | 0 | $CALLER || caller |
| 318 | 0 | 3 | 0 | $CALLER || caller |
| 321 | 0 | 0 | 0 | $CALLER || caller |
| 328 | 1 | 2 | 9 | $reltype eq "rel_one" or $reltype eq "rel_many" |
| 366 | 4 | 0 | 0 | not defined $mode or $mode eq 1 |
| 384 | 0 | 2 | 0 | $CALLER || caller |
| 401 | 3 | 2 | 0 | $_installed_sqlt_hook_functions{$pkg} ||= do { no strict 'refs'; my $stash = %{$pkg . "::";}; croak("${pkg}::sqlt_deploy_hook already exists; DBIx::Class::ResultDDL won't overwrite it." . " (but you can use Moo(se) or Class::Method::Modifiers to apply your own wrapper to this generated method)") if $stash->{'sqlt_deploy_hook'} and $stash->{'sqlt_deploy_hook'}{'CODE'}; BEGIN {${^WARNING_BITS} = "\x50\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x05"} my @methods; die "failed to generate sqlt_deploy_hook: $@" unless eval "sub " . $pkg . "::sqlt_deploy_hook {\n\t\t\tmy \$self= shift;\n\t\t\t\$self->maybe::next::method(\@_);\n\t\t\tfor (\@methods) {\n\t\t\t\tmy (\$m, \@args)= \@\$_;\n\t\t\t\t\$_[0]->\$m(\@args);\n\t\t\t}\n\t\t} 1"; \@methods } |
| 427 | 0 | 1 | 0 | $CALLER || caller |
| 433 | 0 | 1 | 0 | $CALLER || caller |
| 439 | 0 | 3 | 0 | $CALLER || caller |
| 518 | 0 | 1 | 0 | $rel_class ||= $1 |
| 532 | 0 | 11 | 0 | $rel_class ||= $1 |