| blib/lib/Data/Randr.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 11 | 12 | 91.6 |
| line | true | false | branch |
|---|---|---|---|
| 28 | 40000 | 50000 | if (ref $_[0] eq 'Data::Randr') { } |
| 30 | 20000 | 20000 | $rate ? : |
| 31 | 10000 | 30000 | $digit ? : |
| 37 | 0 | 90000 | if not $rate or $rate < 0 or $rate > 100 |
| 40 | 30000 | 60000 | $digit ? : |
| 42 | 30000 | 60000 | if ($digit) |