Branch Coverage

blib/lib/Term/TablePrint.pm
Criterion Covered Total %
branch 1 282 0.3


line true false branch
26 0 1 if ($^O eq "MSWin32")
35 0 0 if @_ > 1
38 0 0 if (defined $opt)
39 0 0 if ref $opt ne "HASH"
42 0 0 if defined $opt->{$key}
109 0 0 if ($self->{'hide_cursor'})
112 0 0 if (exists $self->{'backup_instance_defaults'})
115 0 0 if ($key eq 'plugin' or $key eq 'backup_instance_defaults') { }
0 0 elsif (exists $instance_defaults->{$key}) { }
130 0 0 if (ref $_[0] ne "Term::TablePrint")
137 0 0 if @_ < 1 or @_ > 2
138 0 0 if ref $tbl_orig ne "ARRAY"
139 0 0 if (defined $opt)
140 0 0 if ref $opt ne "HASH"
143 0 0 if defined $opt->{$key}
147 0 0 unless ($self->{'tab_width'} % 2)
156 0 0 if (print_columns($self->{'decimal_separator'}) != 1)
159 0 0 if ($self->{'decimal_separator'} ne ".")
162 0 0 if ($self->{'hide_cursor'})
165 0 0 unless (@$tbl_orig)
176 0 0 if ($self->{'max_rows'} and $data_row_count > $self->{'max_rows'})
181 0 0 $^O eq 'MSWin32' || $^O eq 'cygwin' ? :
199 0 0 unless (defined $term_w)
208 0 0 if (not defined $next) { }
0 0 elsif ($next == $mr->{'last'}) { }
0 0 elsif ($next == $mr->{'window_width_changed'}) { }
0 0 elsif ($next == $mr->{'enter_search_string'}) { }
0 0 elsif ($next == $mr->{'returned_from_filtered_table'}) { }
216 0 0 unless (defined $term_w)
247 0 0 unless (defined $w_cols_calc)
253 0 0 if (length $self->{'prompt'})
256 0 0 if (length $self->{'info'} or length $self->{'prompt'})
262 0 0 if ($const->{'info_row'})
263 0 0 if (print_columns($const->{'info_row'}) > $tbl_w) { }
278 0 0 if ($search->{'filter'})
283 0 0 if ($self->{'footer'})
285 0 0 if ($search->{'filter'})
289 0 0 exists $ENV{'TC_POS_AT_SEARCH'} && !$search->{'filter'} ? :
294 0 0 if ($term_w != get_term_width() + $const->{'extra_w'})
297 0 0 unless (@{$tbl_print;})
309 0 0 @idxs_tbl_print ? :
310 0 0 if (not defined $row) { }
0 0 elsif ($row < 0) { }
314 0 0 if ($row == -1) { }
0 0 elsif ($row == -13) { }
318 0 0 if ($search->{'filter'})
327 0 0 if (not $self->{'table_expand'}) { }
328 0 0 if ($row == 0)
334 0 0 if ($old_row == $row)
335 0 0 if ($row == 0) { }
0 0 elsif ($ENV{'TC_RESET_AUTO_UP'}) { }
336 0 0 if ($self->{'table_expand'})
337 0 0 if ($row_is_expanded)
340 0 0 if ($auto_jumped_to_first_row == 1)
358 0 0 if ($const->{'info_row'} and $row == $#{$tbl_print;})
367 0 0 if (@{$search->{'map_indexes'};}) { }
388 0 0 unless defined $str
389 0 0 if ref $str
390 0 0 if ($self->{'squash_spaces'})
395 0 0 if ($self->{'color'})
399 0 0 if ($self->{'binary_filter'} and substr($str, 0, 100) =~ /[\x00-\x08\x0B-\x0C\x0E-\x1F]/)
400 0 0 if ($self->{'binary_filter'} == 2) { }
413 0 0 if (@$tbl_copy == $self->{'max_rows'})
416 0 0 if ($progress->{'count_progress_bars'})
417 0 0 if ($count >= $progress->{'next_update'})
423 0 0 if ($progress->{'count_progress_bars'})
447 0 0 if (not length $tbl_copy->[$row][$col]) { }
0 0 elsif (&looks_like_number($tbl_copy->[$row][$col])) { }
451 0 0 if ($tbl_copy->[$row][$col] =~ /$regex_number/) { }
452 0 0 if ((length $1 // 0) > $w_int->[$col])
455 0 0 if ((length $2 // 0) > $w_fract->[$col])
461 0 0 if (length $tbl_copy->[$row][$col] > $w_cols->[$col])
468 0 0 if ($str_w > $w_cols->[$col])
473 0 0 if ($progress->{'count_progress_bars'})
474 0 0 if ($count >= $progress->{'next_update'})
481 0 0 if ($w_int->[$col] + $w_fract->[$col] > $w_cols->[$col])
486 0 0 if ($progress->{'count_progress_bars'})
498 0 0 if ($sum < $avail_w) { }
0 0 elsif ($sum > $avail_w) { }
503 0 0 if ($w_col_names->[$col] > $w_cols_calc->[$col])
506 0 0 if ($sum == $avail_w)
511 0 0 if ($sum == $prev_sum)
517 0 0 if ($self->{'trunc_fract_first'})
522 0 0 if ($w_fract->[$col] and $w_fract->[$col] > 3)
529 0 0 if ($sum == $avail_w)
534 0 0 if ($sum == $prev_sum)
539 0 0 $self->{'min_col_width'} < 2 ? :
545 0 0 if ($w_cols_calc->[$col] > $min_col_width)
547 0 0 if ($reduced_col_w < $min_col_width)
550 0 0 if ($w_fract->[$col] > 2)
552 0 0 if ($w_fract->[$col] < 2)
568 0 0 if ($sum == $prev_sum)
570 0 0 if ($min_col_width == 2)
577 0 0 if ($remainder_w)
582 0 0 if ($w_cols_calc->[$col] < $w_cols->[$col])
585 0 0 if ($remainder_w == 0)
590 0 0 if ($remainder_w == $prev_remainder_w)
612 0 0 if (not length $tbl_copy->[$row][$col]) { }
0 0 elsif (&looks_like_number($tbl_copy->[$row][$col])) { }
617 0 0 if ($w_fract->[$col]) { }
619 0 0 if ($tbl_copy->[$row][$col] =~ /$regex_number/) { }
620 0 0 if (length $2) { }
621 0 0 if (length $2 > $w_fract->[$col]) { }
0 0 elsif (length $2 < $w_fract->[$col]) { }
634 0 0 length $1 ? :
644 0 0 if (length $number > $w_cols_calc->[$col]) { }
0 0 elsif (length $number < $w_cols_calc->[$col]) { }
645 0 0 $number =~ /^-/ ? :
647 0 0 if ($w_cols_calc->[$col] < $signed_1_precision_w) { }
657 0 0 if (length $number > $w_cols_calc->[$col]) { }
0 0 elsif (length $number < $w_cols_calc->[$col]) { }
677 0 0 if ($str_w > $w_cols_calc->[$col]) { }
0 0 elsif ($str_w < $w_cols_calc->[$col]) { }
687 0 0 if ($self->{'color'})
688 0 0 if (defined $tbl_orig->[$row][$col])
690 0 0 if (@color)
705 0 0 if ($col != $#$w_cols_calc)
710 0 0 if ($progress->{'count_progress_bars'})
711 0 0 if ($count >= $progress->{'next_update'})
717 0 0 if ($progress->{'count_progress_bars'})
728 0 0 if ($max_key_w > int $term_w / 3)
741 0 0 if ($self->{'color'})
743 0 0 if push @key_color, $1
745 0 0 if ($self->{'binary_filter'} and substr($key, 0, 100) =~ /[\x00-\x08\x0B-\x0C\x0E-\x1F]/)
746 0 0 if ($self->{'binary_filter'} == 2) { }
752 0 0 if (@key_color)
760 0 0 if ($key_w > $max_key_w) { }
0 0 elsif ($key_w < $max_key_w) { }
766 0 0 if (@key_color)
772 0 0 unless (length $value)
775 0 0 if (ref $value)
782 0 0 if (not $count++) { }
803 0 0 unless ($self->{'search'})
814 0 0 defined $error_message ? :
819 0 0 unless (length $string)
823 0 0 unless (eval { do { $search->{'filter'} = $self->{'search'} == 1 ? qr/$string/i : qr/$string/; "Teststring" =~ /$search->{'filter'}/; 1 } })
824 0 0 $self->{'search'} == 1 ? :
828 0 0 $default eq $string ? :
840 0 0 if ($tbl_orig->[$idx_row][$_] =~ /$search->{'filter'}/)
846 0 0 unless (@{$search->{'map_indexes'};})
873 0 0 if ($col != $#$w_cols_calc)