| line |
true |
false |
branch |
|
454
|
0 |
13 |
unless @ids |
|
455
|
0 |
13 |
if @ids > 1 |
|
462
|
27 |
0 |
if ($rsrc) { } |
|
486
|
27 |
0 |
unless $copy_opts->{'progress_bar'} |
|
589
|
0 |
28 |
unless Class::Load::load_optional_class($helper_class) |
|
652
|
28 |
0 |
if ($rsrc) { } |
|
667
|
0 |
0 |
do {
$ref eq 'CODE'
} ? : |
|
|
0 |
0 |
do {
$ref eq 'ARRAY'
} ? : |
|
|
0 |
0 |
do {
not $ref
} ? : |
|
|
0 |
28 |
$on_connect_call ? : |
|
686
|
0 |
0 |
if ($first_occ and ref $first_occ and ref $first_occ eq 'ARRAY') { } |
|
711
|
0 |
0 |
unless $dbi_attrs |
|
722
|
0 |
0 |
do {
subname($callbacks->{'connected'}) =~ /^$package_re/
} ? : |
|
|
0 |
0 |
do {
$ref ne 'CODE' unless not $ref
} ? : |
|
|
0 |
0 |
$callbacks->{'connected'} ? : |
|
728
|
0 |
0 |
unless not $ref |
|
749
|
0 |
0 |
if $conn->max_attempts == 10 |
|
840
|
26 |
29 |
unless $hooks and $hooks->{$hook_name} |
|
897
|
3 |
0 |
if ($is_retryable) |
|
902
|
3 |
0 |
if $progress |
|
908
|
0 |
3 |
if ($failed >= $max / 2) |
|
910
|
0 |
0 |
if ($runner->isa('DBIx::Class::Storage::BlockRunner')) { } |
|
918
|
3 |
0 |
if $progress |
|
930
|
0 |
1209 |
unless $method =~ /^(?:txn|run)$/ |
|
933
|
1209 |
0 |
if (my $rsrc = $self->rsrc) { } |
|
944
|
27 |
1182 |
$method eq 'txn' ? : |
|
964
|
167 |
720 |
do {
$wantarray
} ? : |
|
|
887 |
322 |
defined $wantarray ? : |
|
973
|
0 |
1209 |
if (my $err = $@) { } |
|
975
|
0 |
0 |
if $err =~ /Reached max_attempts amount of / or $block_runner->failed_attempt_count >= $block_runner->max_attempts |
|
980
|
0 |
0 |
unless $self->_retry_handler($block_runner) |
|
989
|
0 |
0 |
do {
$wantarray
} ? : |
|
|
0 |
0 |
defined $wantarray ? : |
|
994
|
167 |
1042 |
$wantarray ? : |
|
1021
|
0 |
184 |
if $ref and $ref ne "ARRAY" |
|
1024
|
0 |
184 |
$ref ? : |
|
1063
|
0 |
28 |
unless $table_sql |
|
1065
|
0 |
28 |
if $helper->dbms_uses_global_fk_namespace |
|
1143
|
0 |
64 |
unless @unique_cols |
|
1146
|
0 |
64 |
unless &all(sub {
$column_set{$_};
}
, @unique_cols) |
|
1151
|
0 |
28 |
unless @unique_ids |
|
1155
|
1 |
27 |
if $helper->has_conflicting_triggers_on_table($orig_table_name) |
|
1239
|
27 |
54 |
if ($trigger_type eq 'INSERT') { } |
|
|
27 |
27 |
elsif ($trigger_type eq 'UPDATE') { } |
|
|
27 |
0 |
elsif ($trigger_type eq 'DELETE') { } |
|
1319
|
0 |
27 |
if ($helper->dbms_uses_global_fk_namespace or $helper->child_fks_need_adjusting) |
|
1335
|
0 |
0 |
if ($dbh->can("statistics_info") and %$fk_hash) |
|
1338
|
0 |
0 |
if defined $_ and $_ ne $orig_table_name |
|
1405
|
0 |
27 |
if ($helper->child_fks_need_adjusting) |
|
1443
|
0 |
27 |
if ($helper->dbms_uses_global_fk_namespace) |
|
1454
|
0 |
27 |
if ($helper->child_fks_need_adjusting) |
|
1503
|
0 |
139 |
if @results |
|
1510
|
0 |
139 |
unless defined $new_name |
|
1561
|
0 |
28 |
unless @{$idxs{'PRIMARY'}{'columns'};} |
|
1563
|
0 |
28 |
unless $self->dbh->can("statistics_info") |
|
1572
|
0 |
28 |
if $@ |
|
1604
|
0 |
0 |
unless $DBIx::OnlineDDL::a->{'FK_NAME'} cmp $DBIx::OnlineDDL::b->{'FK_NAME'} |
|
1609
|
0 |
0 |
unless $row->{'PKTABLE_NAME'} or $row->{'UK_TABLE_CAT'} |
|
1610
|
0 |
0 |
unless $row->{'FKTABLE_NAME'} or $row->{'FK_TABLE_NAME'} |
|
1622
|
0 |
0 |
if ($fks{$key}) { } |
|
1643
|
0 |
0 |
if ($create_table_sql =~ m[
CONSTRAINT \s $fk_name_quote_re \s ( # start capture of full SQL
FOREIGN \s KEY \s \( [^\)]+ \) \s # "FOREIGN KEY" plus column list (which we already have above)
REFERENCES \s [^\(]+ \s \( [^\)]+ \) # "REFERENCES" plus table+column list (again, already captured above)
\s? ( [^\)\,]* ) # ON DELETE/UPDATE, DEFER, MATCH, etc.
) # end capture of full SQL
]six) |
|
1654
|
0 |
0 |
if $extra_sql =~ /ON DELETE ((?:SET |NO )?\w+)/i |
|
1655
|
0 |
0 |
if $extra_sql =~ /ON UPDATE ((?:SET |NO )?\w+)/i |
|
1656
|
0 |
0 |
if $extra_sql =~ /((?:NOT )?DEFERRABLE(?: INITIALLY \w+)?)/i |
|
1657
|
0 |
0 |
if $extra_sql =~ /(MATCH \w+)/i |
|
1675
|
0 |
0 |
if ($fk->{'fk_sql'}) |
|
1693
|
0 |
0 |
$fk->{'match'} ? : |
|
|
0 |
0 |
$fk->{'delete_rule'} ? : |
|
|
0 |
0 |
$fk->{'update_rule'} ? : |
|
|
0 |
0 |
$fk->{'defer'} ? : |