| blib/lib/Game/PseudoRand.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 16 | 16 | 100.0 |
| line | true | false | branch |
|---|---|---|---|
| 22 | 5 | 7 | unless exists $param{'start'} and exists $param{'step'} |
| 24 | 1 | 6 | if defined $param{'rand'} and ref $param{'rand'} ne 'CODE' |
| 30 | 4 | 8 | if (&$rand <= $odds) { } |
| 41 | 1 | 12 | unless exists $param{'start'} and exists $param{'table'} |
| 43 | 2 | 10 | if ref $param{'table'} ne 'ARRAY' or not @{$param{'table'};} |
| 45 | 1 | 9 | if defined $param{'rand'} and ref $param{'rand'} ne 'CODE' |
| 48 | 2 | 7 | if $index < 0 or $index >= @$table |
| 53 | 8 | 12 | if (&$rand <= $odds) { } |