| blib/lib/Data/Transform.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 17 | 18 | 94.4 |
| line | true | false | branch |
|---|---|---|---|
| 91 | 4 | 226 | if (my $val = $self->_handle_get_data) |
| 94 | 62 | 164 | unless @{$self->[0];} |
| 97 | 11 | 170 | if (&blessed($data) and $data->isa('Data::Transform::Meta')) |
| 101 | 135 | 35 | if (defined $ret) |
| 129 | 59 | 105 | unless @$next |
| 151 | 11 | 118 | if (&blessed($packet) and $packet->isa('Data::Transform::Meta')) { } |
| 105 | 13 | elsif (my(@data) = $self->_handle_put_data($packet)) { } | |
| 152 | 11 | 0 | if (my(@ret) = $self->_handle_put_meta($packet)) |
| 208 | 10 | 10 | if @{$self->[0];} |