| line |
true |
false |
branch |
|
35
|
0 |
66 |
unless opendir DIR, "$dir/DBI/Format" |
|
36
|
132 |
132 |
/^(\w+)\.pm$/i ? : |
|
47
|
22 |
0 |
if ($use_abbrev) |
|
62
|
0 |
22 |
unless ($fmt) |
|
71
|
2 |
20 |
if ($@ and $@ =~ /locate/) { } |
|
|
0 |
20 |
elsif ($@) { } |
|
73
|
0 |
2 |
if $@ |
|
75
|
0 |
0 |
if $@ |
|
88
|
22 |
20 |
@_ == 1 ? : |
|
103
|
0 |
0 |
if not $fh and $self->{'fh'} |
|
107
|
52 |
1 |
if ref($fh) =~ /GLOB/ |
|
109
|
0 |
1 |
unless (UNIVERSAL::can($fh, 'print')) |
|
130
|
19 |
0 |
defined $precision ? : |
|
|
0 |
19 |
$type == &SQL_NUMERIC() && defined $precision && $precision > 15 ? : |
|
|
0 |
19 |
$type == &SQL_INTEGER() && defined $precision && $precision > 15 ? : |
|
|
0 |
19 |
$type == &SQL_DATE() ? : |
|
|
0 |
19 |
!defined($type) ? : |
|
154
|
26 |
0 |
if defined $sep |
|
166
|
18 |
1407 |
unless defined $_ |
|
188
|
1 |
0 |
if defined $sep |
|
195
|
14 |
0 |
defined $names->[$i] ? : |
|
219
|
0 |
140 |
if (not defined $_) { } |
|
226
|
12 |
128 |
if (length $_ > $widths->[$i]) |
|
249
|
13 |
1 |
$right_justify->[$i] ? : |
|
280
|
0 |
0 |
if defined $sep |
|
287
|
0 |
0 |
defined $names->[$i] ? : |
|
310
|
0 |
0 |
if (not defined $_) { } |
|
317
|
0 |
0 |
if (length $_ > $widths->[$i]) |
|
340
|
0 |
0 |
$right_justify->[$i] ? : |
|
370
|
1 |
0 |
if defined $sep |
|
392
|
1 |
0 |
if defined $sep |
|
431
|
0 |
140 |
if (not defined $_) { } |
|
445
|
130 |
10 |
$right_justify->[$i] ? : |
|
479
|
14 |
0 |
defined $names->[$i] ? : |
|
503
|
0 |
140 |
if (not defined $_) { } |
|
510
|
12 |
128 |
if (length $_ > $widths->[$i]) |
|
532
|
13 |
1 |
$right_justify->[$i] ? : |