line |
true |
false |
branch |
32
|
0 |
0 |
unless $_[1]{'ix_sqlerrd'}[1]
|
39
|
0 |
0 |
@_ == 1 || @_ > 1 && $_[1] == 1 ? :
|
58
|
0 |
0 |
if ($type_name eq 'int' and $col_info->{'informix_collength'} == 10)
|
68
|
0 |
0 |
$_[1] ? :
|
73
|
0 |
0 |
if $self->validate_boolean_keyword($_[1]) or $self->keyword_function_calls and $_[1] =~ /^\w+\(.*\)$/
|
75
|
0 |
0 |
if $value =~ /^[t1]$/i
|
76
|
0 |
0 |
if $value =~ /^[f0]$/i
|
86
|
0 |
0 |
if $_[0]->validate_date_keyword($_[1])
|
92
|
0 |
0 |
if $_[0]->validate_datetime_keyword($_[1])
|
98
|
0 |
0 |
if $_[0]->validate_datetime_keyword($_[1])
|
104
|
0 |
0 |
if $_[0]->validate_datetime_keyword($_[1])
|
110
|
0 |
0 |
if $_[0]->validate_datetime_keyword($_[1])
|
122
|
0 |
0 |
if $_[0]->validate_timestamp_keyword($_[1])
|
132
|
0 |
0 |
if $self->validate_datetime_year_to_fraction_keyword($dt)
|
148
|
0 |
0 |
if (UNIVERSAL::isa($value, 'DateTime') or $self->validate_date_keyword($value))
|
163
|
0 |
0 |
if ($error)
|
176
|
0 |
0 |
if (UNIVERSAL::isa($value, 'DateTime') or $self->validate_datetime_keyword($value))
|
191
|
0 |
0 |
if ($error)
|
204
|
0 |
0 |
if (UNIVERSAL::isa($value, 'DateTime') or $self->validate_datetime_year_to_second_keyword($value))
|
219
|
0 |
0 |
if ($error)
|
225
|
0 |
0 |
if ref $dt
|
234
|
0 |
0 |
if $self->validate_datetime_year_to_fraction_keyword($arg)
|
247
|
0 |
0 |
if ($error)
|
253
|
0 |
0 |
if (ref $dt)
|
259
|
0 |
0 |
if (length $n < 9)
|
280
|
0 |
0 |
if (UNIVERSAL::isa($value, 'DateTime') or $self->validate_datetime_year_to_minute_keyword($value))
|
295
|
0 |
0 |
if ($error)
|
301
|
0 |
0 |
if ref $dt
|
310
|
0 |
0 |
if (UNIVERSAL::isa($value, 'DateTime') or $self->validate_datetime_year_to_month_keyword($value))
|
316
|
0 |
0 |
if ($value =~ m[^(\d\d?)/(\d{4})$]) { }
|
|
0 |
0 |
elsif ($value =~ /^\d{4}-\d\d$/) { }
|
336
|
0 |
0 |
if ($error)
|
342
|
0 |
0 |
if ref $dt
|
351
|
0 |
0 |
if (UNIVERSAL::isa($value, 'DateTime') or $self->validate_timestamp_keyword($value))
|
366
|
0 |
0 |
if ($error)
|
378
|
0 |
0 |
unless $_[1] =~ /^(?:current|today)$/i
|
385
|
0 |
0 |
unless lc $_[1] eq 'current'
|
392
|
0 |
0 |
unless $_[1] =~ /^(?:current(?: +year +to +(?:fraction(?:\([1-5]\))?|second|minute|hour|day|month))?|today)$/i
|
399
|
0 |
0 |
unless $_[1] =~ /^(?:current(?: +year +to +(?:fraction(?:\([1-5]\))?|second|minute|hour|day|month))?|today)$/i
|
406
|
0 |
0 |
unless $_[1] =~ /^(?:current(?: +year +to +(?:second|minute|hour|day|month))?|today)$/i
|
413
|
0 |
0 |
unless $_[1] =~ /^(?:current(?: +year +to +(?:second|minute|hour|day|month))?|today)$/i
|
420
|
0 |
0 |
unless $_[1] =~ /^(?:current(?: +year +to +(?:second|minute|hour|day|month))?|today)$/i
|
427
|
0 |
0 |
unless $_[1] =~ /^(?:current(?: +year +to +(?:second|minute|hour|day|month))?|today)$/i
|
440
|
0 |
0 |
if ref $_[0] eq 'ARRAY'
|
442
|
0 |
0 |
if (@_ > 1 and not ref $_[1])
|
450
|
0 |
0 |
unless defined $val
|
452
|
0 |
0 |
ref $_[-1] eq 'HASH' ? :
|
456
|
0 |
0 |
$options->{'value_type'} =~ /^(?:(?:big)?(?:float|int(?:eger)?|num(?:eric)?)|decimal)$/i ? :
|
458
|
0 |
0 |
unless defined $val
|
466
|
0 |
0 |
defined $1 ? :
|
468
|
0 |
0 |
if ($numeric)
|
481
|
0 |
0 |
ref $_[0] ? :
|
483
|
0 |
0 |
unless @set and defined $set[0]
|
487
|
0 |
0 |
if (not defined $_) { }
|
|
0 |
0 |
elsif (/^[-+]?\d+(?:\.\d*)?$/) { }
|
509
|
0 |
0 |
if ref $_[0]
|
510
|
0 |
0 |
if @_ > 1
|
514
|
0 |
0 |
unless defined $val
|
522
|
0 |
0 |
defined $1 ? :
|
532
|
0 |
0 |
ref $_[0] ? :
|
534
|
0 |
0 |
unless @array and defined $array[0]
|
538
|
0 |
0 |
if (not defined $_) { }
|
|
0 |
0 |
elsif (/^[-+]?\d+(?:\.\d*)?$/) { }
|
555
|
0 |
0 |
if (length $str > $self->max_array_characters)
|
569
|
0 |
0 |
unless my $dbh = $self->dbh
|
587
|
0 |
0 |
if ($error)
|
608
|
0 |
0 |
if defined $ok
|
610
|
0 |
0 |
unless my $dbh = $self->dbh
|
612
|
0 |
0 |
unless (defined $Major_Version_Cache{$dbh})
|
622
|
0 |
0 |
if $Debug
|
631
|
0 |
0 |
if keys %Major_Version_Cache > 500
|
635
|
0 |
0 |
$Major_Version_Cache{$dbh} >= 10 ? :
|
647
|
0 |
0 |
if (defined $offset) { }
|
664
|
0 |
0 |
unless $hints
|
668
|
0 |
0 |
$hints->{'comment'} ? :
|
|
0 |
0 |
$hints->{$_} ? :
|
689
|
0 |
0 |
unless my $dbh = $self->dbh
|
719
|
0 |
0 |
if ($item =~ /^(?: "((?:""|[^"]+)+)" | ([^"]+) ) \. (?: "((?:""|[^"]+)+)" | ([^"]+) )$/x) { }
|
721
|
0 |
0 |
defined $1 ? :
|
722
|
0 |
0 |
defined $3 ? :
|
729
|
0 |
0 |
if $seen{$table}++
|
731
|
0 |
0 |
if (not defined $schema or $schema eq $user)
|
746
|
0 |
0 |
if ($error)
|
751
|
0 |
0 |
wantarray ? :
|
760
|
0 |
0 |
unless my $dbh = $self->dbh
|
784
|
0 |
0 |
unless (defined $owner)
|