| line |
true |
false |
branch |
|
26
|
0 |
0 |
unless defined $sql |
|
36
|
0 |
0 |
if ($sql =~ /^$delimiter/x) { } |
|
|
0 |
0 |
elsif ($sql =~ /^delimiter\s+(\S+)\s*(?:\n|\z)/ip) { } |
|
|
0 |
0 |
elsif ($sql =~ /^(\s+)/s or $sql =~ /^(\w+)/) { } |
|
|
0 |
0 |
elsif ($sql =~ /^--.*(?:\n|\z)/p or $sql =~ /^\#.*(?:\n|\z)/p or $sql =~ m[^/\*(?:[^\*]|\*[^/])*(?:\*/|\*\z|\z)]p or $sql =~ /^'(?:[^'\\]*|\\(?:.|\n)|'')*(?:'|\z)/p or $sql =~ /^"(?:[^"\\]*|\\(?:.|\n)|"")*(?:"|\z)/p or $sql =~ /^`(?:[^`]*|``)*(?:`|\z)/p) { } |
|
61
|
0 |
0 |
if ($token =~ /^--\s+(\d+)\s*(up|down)/i) |
|
63
|
0 |
0 |
if $version and not $last =~ /^\s*$/s |
|
69
|
0 |
0 |
if ($new) { } |
|
70
|
0 |
0 |
if $version and not $last =~ /^\s*$/s |
|
78
|
0 |
0 |
if $version and not $last =~ /^\s*$/s |
|
84
|
0 |
0 |
unless (sort {$a <=> $b;} keys %{(shift())->{'migrations'}{'up'};})[-1] |
|
92
|
0 |
0 |
if $target != 0 and not $$up{$target} |
|
96
|
0 |
0 |
if $self->_active($db, 1) == $target |
|
100
|
0 |
0 |
if (my $active = $self->_active($db, 1)) == $target |
|
104
|
0 |
0 |
if ($active < $target) { } |
|
106
|
0 |
0 |
if $_ <= $target and $_ > $active |
|
112
|
0 |
0 |
if $_ > $target and $_ <= $active |
|
121
|
0 |
0 |
if (my $error = $@) |
|
135
|
0 |
0 |
unless $create or $results |
|
136
|
0 |
0 |
if ($results and my $next = $results->array) |
|
139
|
0 |
0 |
if $error |