Branch Coverage

blib/lib/Autodia/Handler/SQL.pm
Criterion Covered Total %
branch 0 28 0.0


line true false branch
65 0 0 if $self->_discard_line($fileline)
68 0 0 if ($fileline =~ /^\s*create\s+table\s+(?:\[\w+\]\.)?[\`\'\"\[]?([\w\s]+)[\`\'\"\]]? ?\(?/i) { }
74 0 0 if $exists
80 0 0 if ($fileline =~ /\s*\[?(\S+?)\]?\s+\[?($pattern)\]?\s*([\w\s\(\)]*),?\s*/i)
83 0 0 if ($extra_info =~ /^\s*(\([\d\s]+\))/)
92 0 0 if (my $dep = $self->_is_foreign_key($table, $field)) { }
95 0 0 if (ref $exists_already)
110 0 0 if ($extra_info =~ /(identity|primary[\s_-]key)\s*/i)
123 0 0 unless ($matched)
125 0 0 if ($fileline =~ /primary[\s_-]key\s*\((.*)\)\s*/i)
160 0 0 if (not $field =~ /$table.u?id/i and $field =~ /^(.*)[_-]u?id$/i)
171 0 0 if $line =~ /^(INSERT|DROP|LOCK|ALTER|EXEC|GO)/i
172 0 0 if $line =~ m[^\s*(#|--|/\*|\d+|\))]
173 0 0 if $line =~ /^\s*$/