line |
true |
false |
branch |
75
|
20 |
5 |
if defined $value |
98
|
4 |
1 |
if ref $_[0] |
113
|
0 |
4 |
if ref $_[0] |
116
|
0 |
4 |
unless defined $line |
123
|
1 |
459 |
if ($chr eq "\t") |
139
|
1 |
0 |
if ref $_[0] |
141
|
0 |
1 |
unless defined $wordwrap |
144
|
0 |
1 |
if $line eq '' |
152
|
0 |
1 |
if ($line =~ /\t/) { } |
161
|
0 |
0 |
if ($nextchar eq "\t") |
164
|
0 |
0 |
if ($newlen > $maxlen) { } |
166
|
0 |
0 |
if ($wordwrap == 0 and $wrap =~ /^(.*)([\s])(\S+)$/) { } |
182
|
0 |
0 |
if defined $wrap |
190
|
0 |
1 |
if length $line < $maxlen |
191
|
0 |
1 |
unless defined $maxlen |
197
|
1 |
5 |
if (length $next < $maxlen) { } |
|
0 |
5 |
elsif ($wordwrap == 0) { } |
205
|
0 |
0 |
if ($space_idx == -1 or $space_idx == 0) { } |
228
|
0 |
0 |
if ($text =~ m[^?[a-zA-Z0-9_]+>]s) { } |
|
0 |
0 |
elsif ($text =~ m[^.+?(?=?[a-zA-Z0-9_]+>)]s) { } |
249
|
0 |
0 |
if ($$this{-'htmltext'}) { } |
252
|
0 |
0 |
if ($token =~ /^<(standout|reverse|bold|underline|blink|dim)>$/s) { } |
|
0 |
0 |
elsif ($token =~ m[^(standout|reverse|bold|underline|blink|dim)>$]s) { } |
|
0 |
0 |
elsif ($token =~ /^<(\d*)_?(ACS_HLINE|ACS_VLINE|ACS_TTEE|ACS_BTEE|ACS_PLUS)>$/s) { } |
254
|
0 |
0 |
if ($type eq 'standout') { } |
|
0 |
0 |
elsif ($type eq 'reverse') { } |
|
0 |
0 |
elsif ($type eq 'bold') { } |
|
0 |
0 |
elsif ($type eq 'underline') { } |
|
0 |
0 |
elsif ($type eq 'blink') { } |
|
0 |
0 |
elsif ($type eq 'dim') { } |
262
|
0 |
0 |
if ($type eq 'standout') { } |
|
0 |
0 |
elsif ($type eq 'reverse') { } |
|
0 |
0 |
elsif ($type eq 'bold') { } |
|
0 |
0 |
elsif ($type eq 'underline') { } |
|
0 |
0 |
elsif ($type eq 'blink') { } |
|
0 |
0 |
elsif ($type eq 'dim') { } |
297
|
0 |
0 |
if ($$this{-'htmltext'}) { } |
300
|
0 |
0 |
unless ($token =~ m[^?(reverse|bold|underline|blink|dim)>$]s) |
315
|
0 |
0 |
if ($$this{-'htmltext'}) { } |
321
|
0 |
0 |
if ($token =~ m[^<(/?)(reverse|bold|underline|blink|dim)>]s) { } |
323
|
0 |
0 |
if (defined $type and $type eq '/') { } |
334
|
0 |
0 |
if ($length > $max_length) |
346
|
0 |
0 |
if (length $text > $max_length) |
356
|
0 |
0 |
if ref $_[0] |
367
|
0 |
0 |
if $l > $width |
390
|
0 |
0 |
if ($key eq "\e") { } |
|
0 |
0 |
elsif ($key lt ' ' and $key ne "\n" and $key ne "\t") { } |
|
0 |
0 |
elsif ($key =~ /^\d{2,}$/) { } |
428
|
0 |
1 |
if $blocktime < 0 |
433
|
0 |
1 |
if ($found < 0) { } |
|
1 |
0 |
elsif ($found) { } |
434
|
0 |
0 |
if $Curses::UI::debug |
454
|
0 |
1 |
if ord $key == 127 or $key eq "\cH" |
459
|
0 |
1 |
if $key eq "\177" or $key eq "\cD" |
464
|
0 |
1 |
if $key eq "\n" or $key eq "\r" |
471
|
0 |
1 |
if ($key eq $ESC) |
476
|
0 |
0 |
if $key eq "$ESC-1" or $key eq "$ESC$ESC" |
478
|
0 |
0 |
if $key eq $ESC |
490
|
0 |
0 |
if ($key =~ /\[(\d+)\~/) |
493
|
0 |
0 |
if ($digit >= 11 and $digit <= 15) { } |
|
0 |
0 |
elsif ($digit >= 17 and $digit <= 21) { } |
500
|
0 |
0 |
if $key eq $ESC . 'OH' or $key eq $ESC . '[7~' or $key eq $ESC . '[1~' |
506
|
0 |
0 |
if $key eq $ESC . 'OI' or $key eq $ESC . '[Z' |
511
|
0 |
0 |
if $key eq $ESC . '[2K' |
515
|
0 |
0 |
if $key eq $ESC . 'OF' or $key eq $ESC . '[4~' |
520
|
0 |
0 |
if $key eq $ESC . '[5~' |
524
|
0 |
0 |
if $key eq $ESC . '[6~' |
533
|
0 |
1 |
if ($Curses::UI::debug and $key ne '-1') |