| blib/lib/Acme/Cat/Schroedinger.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 7 | 10 | 70.0 |
| line | true | false | branch |
|---|---|---|---|
| 34 | 1 | 7 | unless $caller[0] eq 'Acme::Cat::Schroedinger' |
| 41 | 0 | 7 | if exists $attrs{$attr} |
| 42 | 5 | 2 | $attrs{'temperament'} eq 'cooperative' || $attrs{'temperament'} eq 'random' && int rand 2 ? : |
| 43 | 0 | 0 | defined $coopRef ? : |
| 45 | 1 | 2 | defined $coopRef ? : |