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
|