Branch Coverage

blib/lib/DBD/SQLeet/VirtualTable/PerlData.pm
Criterion Covered Total %
branch 33 50 66.0


line true false branch
8 3 0 $DBD::SQLeet::sqlite_version_number >= 3010000 ? :
9 3 0 $DBD::SQLeet::sqlite_version_number >= 3021000 ? :
46 0 6 unless $n_cols > 0
48 0 6 unless not $self->{'options'}{'colref'} or $n_cols == 1
53 0 6 unless my $symbolic_ref = $self->{'options'}{'arrayrefs'} || $self->{'options'}{'hashrefs'} || $self->{'options'}{'colref'}
57 0 6 unless defined ${$symbolic_ref;}
75 7 9 $_->{'type'} =~ /INT|REAL|FLOA|DOUB/i ? :
85 6 41 unless $self->{'headers'}
97 0 47 if ($col == -1) { }
107 3 0 $opts->{'colref'} ? :
7 3 $opts->{'hashrefs'} ? :
37 10 $opts->{'arrayrefs'} ? :
112 6 41 if ($op =~ /defined/) { }
1 40 elsif ($op =~ /str/) { }
113 4 2 if ($constraint->{'op'} =~ /NULL/) { }
159 4 0 $opts->{'colref'} ? :
0 4 $opts->{'hashrefs'} ? :
1 4 $opts->{'arrayrefs'} ? :
168 0 5 if (defined $new_rowid) { }
169 0 0 if ${$$self{'rows'};}->[$new_rowid]
190 0 0 if ($new_rowid == $old_rowid) { }
223 0 56 unless $self->{'is_wanted_row'} = do { no warnings; eval $perl_code }
262 17 0 $opts->{'colref'} ? :
171 17 $opts->{'hashrefs'} ? :
69 188 $opts->{'arrayrefs'} ? :