| blib/lib/Acme/KeyboardMarathon.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 8 | 14 | 57.1 |
| line | true | false | branch |
|---|---|---|---|
| 18 | 0 | 10 | if @args % 2 |
| 21 | 0 | 10 | unless $layout =~ /^(?:qwerty|dvorak)\z/ |
| 24 | 0 | 10 | if keys %args |
| 45 | 1 | 9 | if ($layout eq "dvorak") |
| 88 | 0 | 8 | if ref $_[$i] |
| 91 | 0 | 195467 | unless (defined $k->{$_}) |
| 105 | 0 | 195467 | if ($int >= 2147483097) |