Branch Coverage

File:blib/lib/MySQL/Util.pm
Coverage:77.4%

line%coveragebranch
16950TFif (defined $ENV{'VERBOSE_FUNCS'})
181100TFif (not $dbh) { }
20250TFif ($schema)
241100TFif ($$fk_href{'COLUMN_NAME'} eq $column)
256100TFif (defined $self->$cache->{$table})
284100TFif ($fq)
285100TFif ($table =~ /\w\.\w/) { }
100TFelsif ($schema) { }
29550TFif ($table =~ /^(\w+)\.(\w+)$/)
29850TFif $curr ne $1
31650TFif ($table =~ /^(\w+)\.(\w+)$/)
338100TFif ($item =~ /CONSTRAINT `$fk` FOREIGN KEY/)
35450TFunless my $table = $a{'table'}
35550TFunless my $column = $a{'column'}
361100TFif ($$col_href{'FIELD'} eq $column)
38550TFif ($self->_verbose_funcs->{$key})
3870TFif $func_counter
41350TFif ($self->_verbose_funcs->{$key})
4150TFif $func_counter
49650TFunless ($self->_column_exists('table', $table, 'column', $column))
503100TFif ($$col_href{'FIELD'} =~ /^$column$/i)
538100TFif (defined $self->$cache->{$table})
57450TFif (not defined $table) { }
57650TFunless defined $tables_aref
623100TFunless my $table = shift()
631100TFif ($$cons{$con_name}[0]{'CONSTRAINT_TYPE'} eq 'UNIQUE')
663100TFunless ($table =~ /\./)
671100TFif ($$indexes{$index}[0]{'NON_UNIQUE'} == 0)
69050TFif ($self->has_ak($table))
726100TFif (defined $table)
72850TFif ($schema)
7290TFif ($unfq_schema ne $schema)
741100TFif (defined $fq_table)
745100TFif ($cons_name eq $name)
75350TFunless $schema
76250TFif (defined $self->$cache->{$t})
766100TFif ($cons_name eq $name)
7800TFunless ($self->span)
7940TFif ($cons_name eq $name)
838100TFif (defined $self->$cache->{$table})
842100TFunless $self->table_exists($table)
85750TFunless ($self->span)
873100TFunless (defined $$href{$name})
892100TFif @_
920100TFunless my $table = shift()
922100TFunless ($table =~ /\./)
928100TFif (defined $$self{$cache}{$table})
94350TFif ($parent_table eq $table)
946100TFif ($parent_depth >= $depth)
98050TFif $name and $name ne $fk_name
1016100TFif (defined $table and not $table =~ /\./)
1021100TFif (not defined $table) { }
102350TFunless defined $tables_aref
1043100TFif ($type eq 'FOREIGN KEY')
1071100TFunless ($table =~ /\./)
108550TFif (scalar @con_cols == scalar @index_cols)
1089100TFif ($index_cols[$i]{'COLUMN_NAME'} ne $con_cols[$i]{'COLUMN_NAME'})
1097100TFif ($match)
1136100TFunless my $table = shift()
1138100TFunless ($table =~ /\./)
1149100TFunless (exists $h{$key_name})
1175100TFif ($depth > $max)
119850TFunless ($table =~ /\./)
1211100TFif $type eq 'PRIMARY KEY'
1212100TFif $type eq 'FOREIGN KEY'
121350TFif $type eq 'UNIQUE'
124150TFunless ($table =~ /\./)
1252100TFif $name eq 'PRIMARY'
1253100TFif defined $$ak{$name}
1254100TFif defined $$fk{$name}
127950TFunless ($table =~ /\./)
1286100TFif ($$cons{$con_name}[0]{'CONSTRAINT_TYPE'} eq 'PRIMARY KEY')
1318100TFif ($name eq 'PRIMARY')
133850TFif ($self->has_pk($table))
142450TFif ($self->has_pk($table))
1435100TFif ($$col_desc_href{'EXTRA'} =~ /auto/)
1460100TFif ($$desc{'NULL'} eq 'YES')
1486100TFif ($$fk_href{'COLUMN_NAME'} eq $column)
1518100TFif $name and $name ne $con_name
154450TFif ($ref_fq_table eq $fq_table)
1561100TFunless my $table = shift()
1564100TFunless ($table =~ /\./)
1571100TFif ($schema ne $self->_schema)
1586100TFif ($schema ne $self->_schema)