| line |
!l |
l&&!r |
l&&r |
condition |
|
241
|
8076 |
2 |
88 |
$method_name eq 'FETCH' and not exists $ENV{'DBI_TRACE'} |
|
504
|
16968 |
0 |
23338 |
exists $$parent{$_} and not exists $$h_inner{$_} |
|
557
|
2 |
16 |
0 |
defined $level and not looks_like_number($level) |
|
585
|
10 |
16 |
4 |
$file and ref \$file eq 'GLOB' |
|
689
|
0 |
612 |
4 |
$maxlen and $maxlen < length($v) + 2 |
|
704
|
12 |
0 |
0 |
$^W and warn $@ |
|
723
|
12 |
12 |
2 |
defined $evalret and $evalret == -2 |
|
806
|
44 |
90 |
26 |
defined $level and not DBI::looks_like_number($level) |
|
849
|
8 |
0 |
0 |
$h->FETCH('TaintIn') && $h->FETCH('TaintOut') |
|
852
|
2237 |
0 |
42 |
$key eq 'ChildHandles' and $HAS_WEAKEN |
|
859
|
1842 |
343 |
2 |
not $is_valid_attribute{$key} and $key =~ /^[A-Z]/ |
|
868
|
9425 |
1089 |
2 |
not $is_valid_attribute{$key} and $key =~ /^[A-Z]/ |
|
|
10514 |
0 |
2 |
not $is_valid_attribute{$key} and $key =~ /^[A-Z]/ and not exists $$h{$key} |
|
920
|
6 |
7 |
14 |
$$h{'err'} and $errnum |
|
|
13 |
4 |
10 |
$$h{'err'} and $errnum and $$h{'err'} ne $errnum |
|
922
|
11 |
6 |
6 |
$$h{'state'} ne 'S1000' and $state |
|
|
17 |
2 |
4 |
$$h{'state'} ne 'S1000' and $state and $$h{'state'} ne $state |
|
|
4 |
23 |
0 |
$$h{'state'} and ($$h{'state'} ne 'S1000' and $state and $$h{'state'} ne $state) |
|
933
|
0 |
9 |
3 |
defined $errnum and length $errnum > length $$h{'err'} |
| line |
l |
!l&&r |
!l&&!r |
condition |
|
490
|
2975 |
0 |
0 |
tied %$h || $h |
|
592
|
10 |
2 |
14 |
not $file or $file eq 'STDERR' |
|
608
|
4 |
0 |
0 |
$msg ||= "dump_handle $h" |
|
670
|
2 |
6 |
4886 |
not defined $thing or $thing eq '' |
|
688
|
101 |
0 |
515 |
shift() || $DBI::neat_maxlen |
|
848
|
0 |
0 |
3533 |
defined $v or exists $$h{$key} |
|
869
|
2 |
545 |
0 |
$value == -900 or $value == -901 |
|
906
|
0 |
1129 |
0 |
tied %$h || $h |
|
933
|
323 |
5 |
12 |
$errnum or not defined $$h{'err'} |
|
|
328 |
0 |
12 |
$errnum or not defined $$h{'err'} or defined $errnum and length $errnum > length $$h{'err'} |
|
1046
|
4 |
0 |
1801 |
$$h{'_fbav'} || do {
$DBI::rows = $$h{'_rows'} = 0;
DBI::croak('NUM_OF_FIELDS not set') unless my $fields = $$h{'NUM_OF_FIELDS'};
my(@row) = (undef) x $fields;
\@row
} |
|
1056
|
6 |
134 |
0 |
$$h{'_fbav'} ||= dbih_setup_fbav($h) |
|
1083
|
96 |
66 |
0 |
$$h{'_fbav'} ||= dbih_setup_fbav($h) |
|
1085
|
2 |
4 |
156 |
$col < 1 or $col > $num_of_fields |