| line |
true |
false |
branch |
|
40
|
0 |
56 |
if $drh |
|
93
|
2753 |
1433 |
if (defined $fields and defined $dir) { } |
|
94
|
18 |
2735 |
$fields eq '*' ? : |
|
99
|
0 |
1433 |
unless $statement =~ /^\s*set\s+/ |
|
111
|
3923 |
36 |
defined $DBD::ExampleP::statnames{$_} ? : |
|
114
|
36 |
4150 |
if @bad |
|
119
|
2180 |
1970 |
if defined $dir and not $dir =~ /\?/ |
|
120
|
2717 |
1433 |
$dir ? : |
|
122
|
2717 |
1433 |
if (@fields) |
|
143
|
4 |
12 |
if ($types{'VIEW'}) |
|
150
|
12 |
4 |
if ($types{'TABLE'}) |
|
152
|
0 |
12 |
unless opendir $dh, $dir |
|
155
|
0 |
416 |
if ($^O eq 'VMS') |
|
158
|
0 |
0 |
unless $item =~ /\.dir$/io |
|
161
|
324 |
92 |
unless -d $file |
|
170
|
0 |
16 |
unless $$dbh{'dbd_sponge_dbh'} ||= 'DBI'->connect('DBI:Sponge:', '', '') |
|
184
|
0 |
16 |
unless my $sth = $sdbh->prepare("SHOW TABLES FROM $dir", $attr) |
|
217
|
3021 |
6 |
(shift())->FETCH('Active') ? : |
|
239
|
797 |
18169 |
if $attrib eq 'example_driver_path' |
|
247
|
4 |
35031 |
if ($attrib eq 'examplep_set_err') |
|
252
|
3784 |
31247 |
if ($attrib eq 'AutoCommit') |
|
255
|
3780 |
4 |
$value ? : |
|
257
|
4 |
35027 |
if $attrib =~ /^examplep_/ |
|
263
|
807 |
20 |
if $dbh->FETCH('Active') |
|
281
|
14 |
152 |
if $name eq 'foo' |
|
282
|
14 |
138 |
if $name eq 'bar' |
|
283
|
14 |
124 |
if $name eq 'baz' |
|
284
|
14 |
110 |
if $name eq 'boo' |
|
285
|
14 |
96 |
if $name eq 'bop' |
|
310
|
396 |
1941 |
if (@dir) |
|
316
|
12 |
2325 |
unless @$dbd_param == $$sth{'NUM_OF_PARAMS'} |
|
319
|
1433 |
892 |
unless $$sth{'NUM_OF_FIELDS'} |
|
322
|
0 |
892 |
unless defined $dir |
|
332
|
12 |
880 |
if ($dir =~ /^long_list_(\d+)$/) { } |
|
339
|
12 |
868 |
unless opendir $sym, $dir |
|
353
|
1212 |
21834 |
if (ref $dir) { } |
|
355
|
12 |
1200 |
unless ($num > 0) |
|
365
|
135 |
21699 |
unless my $dh = $$sth{'dbd_datahandle'} |
|
368
|
517 |
21182 |
unless ($f) |
|
389
|
866 |
1472 |
if $$sth{'dbd_datahandle'} |
|
402
|
577 |
1950 |
if ($attrib eq 'TYPE') { } |
|
|
577 |
1373 |
elsif ($attrib eq 'PRECISION') { } |
|
|
14 |
1359 |
elsif ($attrib eq 'ParamValues') { } |
|
422
|
2717 |
9197 |
if $attrib eq 'NAME' or $attrib eq 'NULLABLE' or $attrib eq 'SCALE' or $attrib eq 'PRECISION' |