| blib/lib/Prompt/Timeout.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 10 | 22 | 45.4 |
| line | true | false | branch |
|---|---|---|---|
| 77 | 2 | 4 | unless $timeout |
| 79 | 0 | 6 | unless defined $mess |
| 82 | 0 | 6 | unless $timeout =~ /^\d+$/ |
| 87 | 5 | 1 | defined $def ? : |
| 88 | 5 | 1 | defined $def ? : |
| 95 | 6 | 0 | if (not $isa_tty and eof STDIN) { } |
| 104 | 0 | 0 | if (defined $key) { } |
| 105 | 0 | 0 | if $key =~ /^[\r\n]$/x |
| 110 | 0 | 0 | unless ($click and $ans ne '') |
| 111 | 0 | 0 | if ($end < time) |
| 121 | 6 | 0 | !defined($ans) || $ans eq '' ? : |