| line |
true |
false |
branch |
|
40
|
0 |
0 |
if (ref $_[0] ne 'Term::Choose_HAE') |
|
51
|
0 |
0 |
if ($self->{'ll'}) { } |
|
53
|
0 |
0 |
unless defined $_ |
|
58
|
0 |
0 |
unless ($_) |
|
59
|
0 |
0 |
unless defined $_ |
|
60
|
0 |
0 |
if $_ eq '' |
|
62
|
0 |
0 |
if (ref $_) |
|
67
|
0 |
0 |
if $& =~ /\e/ |
|
76
|
0 |
0 |
if ($self->{'ll'}) { } |
|
85
|
0 |
0 |
if $len->[$i] > $longest |
|
103
|
0 |
0 |
if ($str_length > $self->{'avail_col_width'}) { } |
|
|
0 |
0 |
elsif ($str_length < $self->{'avail_col_width'}) { } |
|
104
|
0 |
0 |
if ($self->{'avail_col_width'} > 3) { } |
|
112
|
0 |
0 |
if ($self->{'justify'} == 0) { } |
|
|
0 |
0 |
elsif ($self->{'justify'} == 1) { } |
|
|
0 |
0 |
elsif ($self->{'justify'} == 2) { } |
|
129
|
0 |
0 |
unless open my $trapstdout, '>', \$wrap |
|
131
|
0 |
0 |
if $is_marked |
|
132
|
0 |
0 |
if $is_current_pos |
|
137
|
0 |
0 |
@codes ? : |
|
139
|
0 |
0 |
if ($self->{'length'}[$idx] > $self->{'avail_width'} and $self->{'fill_up'} != 2) |
|
140
|
0 |
0 |
if (@$marked > 1 and not @{$marked->[-1][0];} and $marked->[-1][1] =~ /^\.\.\.\z/) |
|
144
|
0 |
0 |
if ($attr[0] ne 'clear') |
|
145
|
0 |
0 |
if ($self->{'fill_up'} == 1 and @$marked > 1) |
|
146
|
0 |
0 |
if (not @{$marked->[0][0];} and $marked->[0][1] =~ /^\s+\z/) |
|
149
|
0 |
0 |
if (not @{$marked->[-1][0];} and $marked->[-1][1] =~ /^\s+\z/) |
|
153
|
0 |
0 |
unless ($self->{'fill_up'}) |
|
154
|
0 |
0 |
if (not @{$marked->[0][0];} and $marked->[0][1] =~ /^(\s+)\S/) { } |
|
|
0 |
0 |
elsif (not @{$marked->[-1][0];} and $marked->[-1][1] =~ /\S(\s+)\z/) { } |
|
166
|
0 |
0 |
unless ($self->{'fill_up'}) |
|
167
|
0 |
0 |
if ($i == 0 or $i == $#$marked) |
|
168
|
0 |
0 |
if (not @{$marked->[$i][0];} and $marked->[$i][1] =~ /^\s+\z/) |
|
176
|
0 |
0 |
@{$_->[0];} ? : |
|
177
|
0 |
0 |
if ($is_marked or $is_current_pos) |