| blib/lib/Game/PseudoRand.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 28 | 32 | 87.5 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 22 | 3 | 2 | 7 | exists $param{'start'} and exists $param{'step'} |
| 24 | 5 | 1 | 1 | defined $param{'rand'} and ref $param{'rand'} ne 'CODE' |
| 41 | 1 | 0 | 12 | exists $param{'start'} and exists $param{'table'} |
| 45 | 8 | 1 | 1 | defined $param{'rand'} and ref $param{'rand'} ne 'CODE' |
| line | l | !l | condition |
|---|---|---|---|
| 27 | 1 | 5 | $param{'rand'} // sub { rand; } |
| 46 | 3 | 6 | $param{'index'} // 0 |
| 51 | 1 | 6 | $param{'rand'} // sub { rand; } |
| 56 | 0 | 2 | $param{'index'} // 0 |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 26 | 2 | 4 | 0 | $param{'reset'} // $odds |
| 43 | 1 | 1 | 10 | ref $param{'table'} ne 'ARRAY' or not @{$param{'table'};} |
| 48 | 1 | 1 | 7 | $index < 0 or $index >= @$table |
| 50 | 2 | 5 | 0 | $param{'reset'} // $odds |