| blib/lib/Exodist/Util/Accessors.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 13 | 22 | 59.0 |
| line | true | false | branch |
|---|---|---|---|
| 28 | 1 | 3 | ref $accessor ? : |
| 48 | 12 | 34 | if @_ |
| 49 | 4 | 42 | if $default and not exists $$self{$name} |
| 97 | 0 | 1 | unless delete $$ref{$type} |
| 106 | 0 | 2 | unless @_ |
| 130 | 0 | 0 | unless $$ref{$type} |
| 0 | 5 | if $type | |
| 131 | 5 | 0 | @$_ ? : |
| 141 | 2 | 0 | @$_ ? : |
| 162 | 0 | 1 | unless @_ |
| 211 | 66 | 0 | if blessed $self |