Branch Coverage

blib/lib/Rose/DB/Oracle.pm
Criterion Covered Total %
branch 7 122 5.7


line true false branch
35 0 10 if (@_)
37 0 0 if (@_ == 1 and ref $_[0] eq 'ARRAY') { }
54 0 10 unless (@_)
57 0 0 unless $self->default_post_connect_sql
0 0 unless $self->{'post_connect_sql'}
58 0 0 unless $self->default_post_connect_sql
0 0 unless $self->{'post_connect_sql'}
0 0 wantarray ? :
61 10 0 if (@_ == 1 and ref $_[0] eq 'ARRAY') { }
71 0 0 unless $self->default_post_connect_sql
0 0 unless $self->{'post_connect_sql'}
72 0 10 unless $self->default_post_connect_sql
0 10 unless $self->{'post_connect_sql'}
0 10 wantarray ? :
78 0 0 if @_
89 0 0 unless defined $table
92 0 0 unless defined $column
103 9 0 if ($args{'host'} or $args{'port'})
120 0 0 if defined $self->{'database_version'}
126 0 0 if ($version =~ /^(\d+)\.(\d+)(?:\.(\d+))?/)
147 0 0 $args{'include_views'} ? :
157 0 0 unless my($dbh) = $self->dbh
167 0 0 unless $table->{'TABLE_NAME'} =~ /^BIN\$.+\$.+/
174 0 0 if ($error)
179 0 0 wantarray ? :
186 0 0 unless my $dbh = $self->dbh
207 0 0 if ($error)
224 0 0 unless my $dbh = $self->dbh
248 0 0 if ($error)
250 0 0 if ('DBI'->err == 8002)
252 0 0 if (defined $self->next_value_in_sequence($sequence_name))
273 0 0 unless my $dbh = $self->dbh
294 0 0 if ($error)
298 0 0 if ($dbi_error == 8002) { }
0 0 elsif ($dbi_error == 2289) { }
300 0 0 if (defined $self->next_value_in_sequence($sequence_name))
331 0 0 unless defined $default
388 0 0 @_ == 1 ? :
390 0 0 unless my $table = $args{'table'}
416 0 0 if ($error or not $columns)
419 0 0 unless defined $error
425 0 0 wantarray ? :
435 0 0 if ($offset) { }
471 0 0 unless ref $lock
473 0 0 if $lock->{'for_update'}
475 0 0 unless ($lock->{'type'} eq 'for update')
484 0 0 if (my $on = $lock->{'on'}) { }
0 0 elsif (my $columns = $lock->{'columns'}) { }
492 0 0 if ($tables)
507 0 0 defined $map{$1} ? :
0 0 /^([^.]+)\.([^.]+)$/ ? :
0 0 ref $_ eq 'SCALAR' ? :
513 0 0 if (@columns)
518 0 0 if ($lock->{'nowait'}) { }
0 0 elsif (my $wait = $lock->{'wait'}) { }
527 0 0 if ($lock->{'skip_locked'})
535 0 0 $_[1] ? :
544 0 0 unless $_[1] =~ /^(?:CURRENT_|SYS|LOCAL)(?:TIMESTAMP|DATE)$/i
571 0 0 if ($value =~ /\d\d:/) { }
595 0 0 unless s/( \d\d:\d\d:\d\d)(?!\.)/$1.000000/ or s/( \d\d:\d\d:\d\d\.)(\d{1,5})(\D|$)/"$1$2" . '0' x (6 - length($2)) . $3;/e
613 0 0 unless s/( \d\d:\d\d:\d\d)(?!\.)/$1.000000/ or s/( \d\d:\d\d:\d\d\.)(\d{1,5})(\D|$)/"$1$2" . '0' x (6 - length($2)) . $3;/e