| line |
true |
false |
branch |
|
54
|
6 |
47 |
if ($key =~ /^([a-zA-Z0-9]+)_(.*)/) { } |
|
|
9 |
38 |
elsif (ref $val eq 'HASH') { } |
|
|
3 |
35 |
elsif ($key eq 'font' and $lev == 1) { } |
|
|
1 |
34 |
elsif ($key eq 'lalign' and $lev == 1) { } |
|
|
1 |
33 |
elsif ($key eq 'border' and $lev == 1) { } |
|
74
|
8 |
9 |
wantarray ? : |
|
87
|
0 |
8 |
if exists $opt{'border'} |
|
92
|
2 |
6 |
if ($opt{'stylesheet'}) |
|
100
|
2 |
6 |
$opt{'font'} ? : |
|
117
|
0 |
107 |
unless defined(my $toencode = shift()) |
|
119
|
0 |
107 |
if ($@) { } |
|
144
|
95 |
0 |
unless $saw{$key}++ |
|
150
|
2 |
10 |
unless defined(my $text = shift()) |
|
178
|
0 |
50 |
unless $$self{'stylesheet'} |
|
183
|
31 |
19 |
if (ref $$self{'styleclass'} eq 'ARRAY') { } |
|
184
|
4 |
27 |
if ($row and $$self{'_notfirstrow'}) |
|
186
|
1 |
3 |
unless (@{$$self{'styleclass'};}) |
|
201
|
0 |
19 |
unless $$self{'useid'} |
|
203
|
15 |
4 |
$base ? : |
|
213
|
0 |
0 |
if (not $last) { } |
|
|
0 |
0 |
elsif ($what eq $last) { } |
|
|
0 |
0 |
elsif ($HTML::QuickTable::INDENT{$what} > $HTML::QuickTable::INDENT{$last}) { } |
|
|
0 |
0 |
elsif ($HTML::QuickTable::INDENT{$what} < $HTML::QuickTable::INDENT{$last}) { } |
|
236
|
0 |
41 |
if (@_ > 1) { } |
|
|
41 |
0 |
elsif ($ref) { } |
|
|
0 |
0 |
elsif (not $$self{'_level'}) { } |
|
255
|
38 |
3 |
if ($ref eq 'ARRAY') { } |
|
258
|
30 |
8 |
$$self{'_level'} ? : |
|
259
|
4 |
34 |
if $$self{'useid'} |
|
260
|
10 |
28 |
if $$self{'stylesheet'} |
|
261
|
11 |
27 |
unless ++$$self{'_level'} == 2 |
|
264
|
2 |
36 |
if ($$self{'vertical'} and ref $$data[0] eq 'ARRAY') { } |
|
283
|
33 |
91 |
unless ($$self{'_level'} == 2) |
|
284
|
3 |
30 |
if $$self{'useid'} |
|
285
|
8 |
25 |
if $$self{'stylesheet'} |
|
288
|
27 |
97 |
if ($$self{'_level'} == 1) { } |
|
295
|
69 |
28 |
if (my $l = $$self{'labels'}) |
|
296
|
23 |
46 |
if ($l =~ /[1T]/i and not $$self{'_notfirstrow'} or $l =~ /L/i and not $colnum or $l =~ /R/i and $colnum == @tmprow - 1) { } |
|
|
0 |
46 |
elsif ($l =~ /B/i) { } |
|
307
|
12 |
85 |
if $$self{'useid'} |
|
308
|
32 |
65 |
if $$self{'stylesheet'} |
|
311
|
3 |
94 |
if (ref $row) { } |
|
316
|
0 |
94 |
if $$self{'nameopts'} and $td eq 'th' |
|
317
|
12 |
82 |
if $$self{'htmlize'} |
|
319
|
4 |
90 |
unless (defined $row) |
|
322
|
4 |
0 |
if $$self{'nulltags'} |
|
323
|
0 |
4 |
if $$self{'useid'} |
|
324
|
2 |
2 |
if $$self{'stylesheet'} |
|
330
|
33 |
91 |
unless ($$self{'_level'} == 2) |
|
335
|
11 |
27 |
unless $$self{'_level'}-- == 2 |
|
340
|
3 |
0 |
if ($ref eq 'HASH') { } |
|
|
0 |
0 |
elsif ($ref and UNIVERSAL::can($ref, 'param')) { } |
|
346
|
0 |
3 |
if (ref $$data{$key} eq 'HASH') { } |
|
|
3 |
0 |
elsif (ref $$data{$key} eq 'ARRAY' or not ref $$data{$key}) { } |
|
385
|
0 |
3 |
ref $$data{$row} eq 'ARRAY' ? : |
|
399
|
0 |
0 |
@val > 1 ? : |
|
407
|
3 |
11 |
if ($$self{'header'} and not $$self{'_level'} and not $$self{'_sentheader'}++) |
|
408
|
2 |
1 |
$$self{'title'} ? : |
|
409
|
2 |
1 |
$$self{'title'} ? : |
|
410
|
1 |
2 |
$$self{'stylesheet'} && $$self{'stylesheet'} ne 1 ? : |
|
412
|
1 |
2 |
$$self{'text'} ? : |