| blib/lib/Prompt/Timeout.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % | 
| branch | 10 | 22 | 45.4 | 
| line | true | false | branch | 
|---|---|---|---|
| 72 | 2 | 3 | unless $timeout | 
| 74 | 0 | 5 | unless defined $mess | 
| 77 | 0 | 5 | unless $timeout =~ /^\d+$/ | 
| 82 | 4 | 1 | defined $def ? : | 
| 83 | 4 | 1 | defined $def ? : | 
| 90 | 5 | 0 | if (not $isa_tty and eof STDIN) { } | 
| 99 | 0 | 0 | if (defined $key) { } | 
| 100 | 0 | 0 | if $key =~ /^[\r\n]$/x | 
| 105 | 0 | 0 | unless ($click and $ans ne '') | 
| 106 | 0 | 0 | if ($end < time) | 
| 116 | 5 | 0 | !defined($ans) || $ans eq '' ? : |