blib/lib/EntityModel/Class/Accessor.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 6 | 26 | 23.0 |
line | true | false | branch |
---|---|---|---|
39 | 0 | 0 | ref $$v{'valid'} eq 'CODE' ? : |
0 | 7 | defined $$v{'valid'} ? : | |
51 | 0 | 4 | if ($opt{'pre'} or $opt{'post'}) { } |
54 | 0 | 0 | if ($opt{'pre'}) |
55 | 0 | 0 | unless $opt{'pre'}($self, @_) |
58 | 0 | 0 | if (@_) |
59 | 0 | 0 | if $opt{'validate'} and not $opt{'validate'}($_[0]) |
62 | 0 | 0 | if &Scalar::Util::readonly($v) and not ref $v |
65 | 0 | 0 | if $opt{'post'} |
66 | 0 | 0 | if @_ |
71 | 2 | 2 | unless @_ > 1 |
72 | 0 | 2 | if $opt{'validate'} and not $opt{'validate'}(@_) |
75 | 0 | 2 | if &Scalar::Util::readonly($v) and not ref $v |