| blib/lib/Term/ReadLine/Simple.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 2 | 81 | 2.4 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 86 | 53 | 0 | 0 | exists $opt->{'sep'} and not $self->{'called_sep_message'} |
| 53 | 0 | 0 | exists $opt->{'sep'} and not $self->{'called_sep_message'} and $sub ne 'readline' | |
| 301 | 0 | 0 | 0 | not defined $self->{'compat'} and $ENV{'READLINE_SIMPLE_COMPAT'} |
| 507 | 0 | 0 | 0 | defined $opt and ref $opt ne 'HASH' |
| 565 | 0 | 0 | 0 | $tmp_maxrows != $maxrows and $tmp_maxrows < @$list + 1 |
| 745 | 0 | 0 | 0 | not defined $self->{'compat'} and $ENV{'READLINE_SIMPLE_COMPAT'} |
| 771 | 0 | 0 | 0 | defined $self->{'enter_row'} and $self->{'enter_row'} == $self->{'curr_row'} |
| 0 | 0 | 0 | defined $self->{'enter_row'} and $self->{'enter_row'} == $self->{'curr_row'} and defined $self->{'enter_col'} | |
| 0 | 0 | 0 | defined $self->{'enter_row'} and $self->{'enter_row'} == $self->{'curr_row'} and defined $self->{'enter_col'} and $self->{'enter_col'} == $pos |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 219 | 0 | 0 | 0 | $key == 127 or $key == 8 |
| 0 | 0 | 0 | $key == 346 or $key == 4 | |
| 0 | 0 | 0 | $key == 339 or $key == 6 | |
| 0 | 0 | 0 | $key == 337 or $key == 2 | |
| 0 | 0 | 0 | $key == 335 or $key == 5 | |
| 0 | 0 | 0 | $key == 336 or $key == 1 | |
| 0 | 0 | 0 | $key == 338 or $key == 340 | |
| 298 | 0 | 0 | 0 | $key eq "\n" or $key eq "\r" |
| 301 | 0 | 0 | 0 | $self->{'compat'} or not defined $self->{'compat'} and $ENV{'READLINE_SIMPLE_COMPAT'} |
| 565 | 0 | 0 | 0 | $tmp_maxcols != $maxcols or $tmp_maxrows != $maxrows and $tmp_maxrows < @$list + 1 |
| 572 | 0 | 0 | 0 | $key == 127 or $key == 8 |
| 0 | 0 | 0 | $key == 346 or $key == 4 | |
| 0 | 0 | 0 | $key == 335 or $key == 5 | |
| 0 | 0 | 0 | $key == 336 or $key == 1 | |
| 0 | 0 | 0 | $key == 333 or $key == 2 | |
| 0 | 0 | 0 | $key == 334 or $key == 6 | |
| 731 | 0 | 0 | 0 | $key eq "\n" or $key eq "\r" |
| 745 | 0 | 0 | 0 | $self->{'compat'} or not defined $self->{'compat'} and $ENV{'READLINE_SIMPLE_COMPAT'} |