| blib/lib/Data/Visitor.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 19 | 43 | 44.1 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 62 | 192 | 0 | 175 | ref $data && &refaddr($data) |
| 153 | 55 | 1 | 5 | defined tied %$hash and $self->tied_as_objects |
| 237 | 19 | 0 | 4 | defined tied @$array and $self->tied_as_objects |
| 302 | 7 | 0 | 4 | defined tied $$scalar and $self->tied_as_objects |
| 356 | 2 | 0 | 4 | defined tied *$glob and $self->tied_as_objects |
| 405 | 79 | 0 | 9 | &blessed($proto) and not &blessed($new) |
| 419 | 0 | 0 | 0 | ref $value and &isweak($value) |
| 427 | 0 | 0 | 0 | ref $value and $targets{&refaddr($value)} |
| line | l | !l | condition |
|---|---|---|---|
| 55 | 292 | 75 | $self->{'_seen'} || {} |
| 137 | 137 | 0 | $self->can(lc "visit_$reftype") || 'visit_value' |
| 371 | 4 | 2 | *$glob{$_} || (next) |
| 376 | 0 | 0 | *$glob{$_} || (next) |
| 428 | 0 | 0 | $seen_hash->{'weakened'} ||= [] |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 17 | 0 | 0 | 9 | our $DEBUG || $ENV{'DATA_VISITOR_DEBUG'} |
| 38 | 0 | 0 | 0 | $DEBUG{$category} or not exists $DEBUG{$category} |
| 63 | 0 | 0 | 0 | $seen_hash->{'weak'} ||= &isweak($data) |