blib/lib/Data/Object/AutoWrap.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 20 | 24 | 83.3 |
line | true | false | branch |
---|---|---|---|
189 | 18 | 49 | if ('HASH' eq ref $value) { } |
20 | 29 | elsif ('ARRAY' eq ref $value) { } | |
193 | 0 | 18 | if $@ |
196 | 2 | 16 | if (@_) { } |
212 | 1 | 9 | 'ARRAY' eq ref $_ ? : |
213 | 3 | 17 | if wantarray and @_ == 0 |
218 | 0 | 17 | unless @_ |
228 | 0 | 27 | if @_ |
240 | 2 | 1 | if (@_) { } |
254 | 39 | 3 | exists $$data{$method} ? : |
263 | 0 | 38 | if $field eq 'DESTROY' |
264 | 37 | 1 | if (my $code = $self->can($field)) |