| line |
true |
false |
branch |
|
89
|
0 |
14 |
defined $self->{'options'}{'reportErrors'} ? : |
|
108
|
0 |
0 |
$self->{'options'}{'chaining'} ? : |
|
|
0 |
13 |
unless (defined $_[0]) |
|
109
|
10 |
3 |
if ref $_[0] eq 'ARRAY' |
|
110
|
0 |
0 |
$self->{'options'}{'chaining'} ? : |
|
|
0 |
13 |
unless (scalar @_ != 0) |
|
111
|
0 |
0 |
$self->{'options'}{'chaining'} ? : |
|
|
0 |
13 |
unless (scalar @{$self->{'tbl_rows'};} == 0) |
|
118
|
14 |
25 |
if scalar @{$_;} > $max |
|
125
|
13 |
0 |
if $max |
|
128
|
1 |
12 |
$self->{'options'}{'chaining'} ? : |
|
168
|
4 |
38 |
if ref $_[0] eq 'ARRAY' |
|
169
|
0 |
0 |
$self->{'options'}{'chaining'} ? : |
|
|
0 |
42 |
if (scalar @_ > scalar @{$self->{'tbl_cols'};} and ref $_[0] ne 'ARRAY') |
|
172
|
1 |
41 |
if (scalar @_ > 0 and ref $_[0] eq 'ARRAY') |
|
176
|
1 |
0 |
$self->{'options'}{'chaining'} ? : |
|
186
|
0 |
121 |
unless defined $_[$c] |
|
189
|
4 |
117 |
if ($width > 0) { } |
|
200
|
140 |
17 |
defined @{$_;}[$num] && $self->count(@{$_;}[$num]) ? : |
|
210
|
3 |
38 |
$self->{'options'}{'chaining'} ? : |
|
241
|
0 |
0 |
$self->{'options'}{'chaining'} ? : |
|
|
0 |
1 |
unless (scalar @{$self->{'tbl_rows'};} > 0) |
|
243
|
0 |
1 |
if (defined $row and ref $row eq 'ARRAY') { } |
|
|
0 |
1 |
elsif (defined $row) { } |
|
251
|
0 |
0 |
$self->{'options'}{'chaining'} ? : |
|
|
0 |
0 |
if ($row < 0 or $row > scalar @{$self->{'tbl_rows'};}) |
|
257
|
0 |
1 |
$self->{'options'}{'chaining'} ? : |
|
263
|
0 |
0 |
$self->{'options'}{'chaining'} ? : |
|
|
0 |
4 |
unless (defined $col) |
|
277
|
0 |
0 |
$self->{'options'}{'chaining'} ? : |
|
|
0 |
0 |
unless (defined $col and defined $direction or defined $col and ref $col eq 'HASH') |
|
278
|
0 |
0 |
$self->{'options'}{'chaining'} ? : |
|
|
0 |
0 |
unless (defined &find($col, $self->{'tbl_cols'}) or defined $col and ref $col eq 'HASH') |
|
280
|
0 |
5 |
if (ref $col eq 'HASH') { } |
|
282
|
0 |
0 |
$self->{'options'}{'chaining'} ? : |
|
|
0 |
0 |
unless (defined &find($_, $self->{'tbl_cols'})) |
|
288
|
0 |
5 |
$self->{'options'}{'chaining'} ? : |
|
300
|
0 |
0 |
$self->{'options'}{'chaining'} ? : |
|
|
0 |
0 |
unless (defined $col and defined $direction) |
|
301
|
0 |
0 |
$self->{'options'}{'chaining'} ? : |
|
|
0 |
0 |
unless (defined &find($col, $self->{'tbl_cols'})) |
|
304
|
0 |
0 |
$self->{'options'}{'chaining'} ? : |
|
319
|
0 |
0 |
$self->{'options'}{'chaining'} ? : |
|
|
0 |
1 |
unless (defined $col and defined $width) |
|
320
|
0 |
0 |
$self->{'options'}{'chaining'} ? : |
|
|
0 |
1 |
unless (defined &find($col, $self->{'tbl_cols'})) |
|
321
|
0 |
0 |
$self->{'options'}{'chaining'} ? : |
|
|
0 |
1 |
unless (scalar @{$self->{'tbl_rows'};} == 0) |
|
324
|
0 |
1 |
$strict ? : |
|
326
|
0 |
1 |
$self->{'options'}{'chaining'} ? : |
|
338
|
0 |
458 |
unless defined find($colname, $self->{'tbl_cols'}) |
|
351
|
0 |
92 |
if (defined $self->{'tbl_width_strict'}{$colname} and $self->{'tbl_width_strict'}{$colname} == 1 and int $self->{'tbl_width'}{$colname} > 0) { } |
|
364
|
24 |
6 |
unless defined $self->{'options'}{'headingText'} |
|
367
|
4 |
2 |
if ($headingwidth > $tablewidth) |
|
375
|
2 |
10 |
if ($antall < $extrasome) |
|
393
|
12 |
26 |
unless (defined $self->{'cache_TableWidth'}) |
|
403
|
0 |
55 |
unless (defined $stop) |
|
404
|
55 |
0 |
defined $line ? : |
|
405
|
55 |
0 |
defined $delim ? : |
|
413
|
55 |
118 |
if $i == 0 |
|
414
|
55 |
118 |
if $i == scalar(@{$self->{'tbl_cols'};}) - 1 |
|
418
|
118 |
55 |
if $i != scalar(@{$self->{'tbl_cols'};}) - 1 |
|
531
|
0 |
5 |
if (ref $name eq 'HASH') { } |
|
551
|
1 |
2 |
if ($running_width + $column_width >= $self->{'options'}{'outputWidth'}) { } |
|
563
|
0 |
2 |
unless (defined $self->{'options'}{'outputWidth'}) |
|
565
|
0 |
2 |
if $self->getTableWidth < $self->{'options'}{'outputWidth'} |
|
566
|
1 |
1 |
if scalar @{$self->{'tbl_cuts'};} < 1 |
|
573
|
0 |
5 |
unless (defined $text) |
|
579
|
0 |
5 |
if ($tablewidth - 4 < $self->count($text) and $opt eq 'title') { } |
|
589
|
0 |
5 |
$self->{'options'}{'allowHTML'} || $self->{'options'}{'allowANSI'} || $self->{'options'}{'cb_count'} ? : |
|
596
|
0 |
85 |
unless (defined $row) |
|
605
|
29 |
218 |
if ($isheader != 1 and defined $self->{'tbl_align'}{@{$$self{'tbl_cols'};}[$i]}) { } |
|
|
57 |
161 |
elsif ($isheader == 1) { } |
|
610
|
0 |
29 |
$self->{'options'}{'allowHTML'} || $self->{'options'}{'allowANSI'} || $self->{'options'}{'cb_count'} ? : |
|
618
|
6 |
51 |
$self->{'options'}{'allowHTML'} || $self->{'options'}{'allowANSI'} || $self->{'options'}{'cb_count'} ? : |
|
625
|
18 |
143 |
$self->{'options'}{'allowHTML'} || $self->{'options'}{'allowANSI'} || $self->{'options'}{'cb_count'} ? : |
|
628
|
162 |
85 |
if $i != scalar(@{$row;}) - 1 |
|
812
|
131 |
14 |
unless $page > 0 |
|
815
|
0 |
14 |
if scalar @{$self->{'tbl_cuts'};} < 1 |
|
824
|
1 |
17 |
defined $top ? : |
|
825
|
1 |
17 |
defined $toprow ? : |
|
826
|
1 |
17 |
defined $middle ? : |
|
827
|
1 |
17 |
defined $middlerow ? : |
|
828
|
1 |
17 |
defined $bottom ? : |
|
829
|
0 |
18 |
defined $rowline ? : |
|
830
|
2 |
16 |
defined $page ? : |
|
835
|
17 |
1 |
unless $self->{'options'}{'hide_FirstLine'} |
|
836
|
3 |
15 |
if (defined $self->{'options'}{'headingText'}) |
|
838
|
2 |
1 |
if ($title =~ /\n/) { } |
|
846
|
3 |
0 |
unless $self->{'options'}{'hide_HeadLine'} |
|
849
|
17 |
1 |
unless ($self->{'options'}{'hide_HeadRow'}) |
|
855
|
17 |
1 |
unless $self->{'options'}{'hide_HeadLine'} |
|
860
|
1 |
0 |
if ($self->{'options'}{'drawRowLine'} and $self->{'tbl_rowline'}{$i} and $i != scalar @{$self->{'tbl_rows'};} or defined $self->{'tbl_lines'}{$i} and $self->{'tbl_lines'}{$i} and $i != scalar @{$self->{'tbl_rows'};} and $i != scalar @{$self->{'tbl_rows'};}) |
|
865
|
17 |
1 |
unless $self->{'options'}{'hide_LastLine'} |
|
876
|
0 |
993 |
if (defined $self->{'options'}{'cb_count'} and ref $self->{'options'}{'cb_count'} eq 'CODE') { } |
|
|
0 |
1986 |
elsif (defined $self->{'options'}{'cb_count'} and ref $self->{'options'}{'cb_count'} ne 'CODE') { } |
|
878
|
0 |
0 |
unless $@ |
|
879
|
0 |
0 |
if ($@) |
|
885
|
51 |
942 |
if $self->{'options'}{'allowHTML'} |
|
886
|
51 |
942 |
if $self->{'options'}{'allowANSI'} |
|
887
|
51 |
942 |
if $self->{'options'}{'allowANSI'} |
|
896
|
215 |
73 |
if ($dir =~ /auto/i) |
|
897
|
35 |
180 |
if ($text =~ /^-?\d+([.,]\d+)*[%\w]?$/) { } |
|
903
|
0 |
288 |
if (ref $dir eq 'CODE') { } |
|
|
79 |
209 |
elsif ($dir =~ /right/i) { } |
|
|
192 |
17 |
elsif ($dir =~ /left/i) { } |
|
|
0 |
17 |
elsif ($dir =~ /justify/i) { } |
|
|
17 |
0 |
elsif ($dir =~ /center/i) { } |
|
905
|
0 |
0 |
if $@ |
|
911
|
72 |
7 |
if ($length - $visuallen > 0) |
|
914
|
63 |
16 |
if $strict |
|
919
|
116 |
76 |
if ($length - $visuallen > 0) |
|
922
|
164 |
28 |
if $strict |
|
927
|
0 |
0 |
if $strict |
|
928
|
0 |
0 |
if ($self->count($text) < $length - ($visuallen - $reallen)) |
|
934
|
0 |
0 |
if (scalar @tmp) |
|
943
|
0 |
0 |
if ($modulus) |
|
956
|
6 |
11 |
if $left != int $left and $left > 0.4 |
|
958
|
12 |
5 |
$left > 0 ? : |
|
|
11 |
6 |
$right > 0 ? : |
|
959
|
7 |
10 |
if $strict |
|
989
|
0 |
3 |
if (scalar @list > scalar @{$self->{'tbl_cols'};}) |
|
999
|
0 |
0 |
if $self->{'options'}{'reportErrors'} |
|
1004
|
0 |
464 |
unless defined $_[1] |
|
1005
|
464 |
482 |
if @{$_[1];}[$_] eq $_[0] |