| lib/Class/Usul/TraitFor/Prompting.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 11 | 31 | 35.4 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 175 | 2 | 0 | 0 | $opts->{'quit'} and defined $result |
| 2 | 0 | 0 | $opts->{'quit'} and defined $result and lc $result eq 'q' | |
| 232 | 1 | 0 | 0 | $quit and $result =~ / \A (?: $quit | [\e] ) /mix |
| line | l | !l | condition |
|---|---|---|---|
| 147 | 0 | 1 | $prompt // 'Press any key to continue' |
| 155 | 1 | 1 | $question // 'Enter your answer' |
| 157 | 2 | 0 | $opts->{'default'} // '' |
| 183 | 0 | 1 | $prompt //= '+Select one option from the following list:' |
| 187 | 0 | 1 | $opts->{'options'} // [] |
| 192 | 0 | 1 | $opts->{'options'} // [] |
| 199 | 0 | 0 | $opts->{'default'} // 0 |
| 211 | 0 | 1 | $question // 'Choose' |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 163 | 0 | 0 | 0 | $opts->{'width'} || $self->config->pwidth |
| 222 | 0 | 0 | 0 | $opts->{'width'} || $self->config->pwidth |