blib/lib/Class/Declare.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 97 | 155 | 62.5 |
line | l | !l | condition |
---|---|---|---|
1984 | 130 | 77 | ref $self and $hash = $__OBJECTS__{${$self;}} and return $hash |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
682 | 5 | 2 | 281 | ref $ref and ref $ref eq 'HASH' |
797 | 115 | 16 | 11 | ref $value and $value =~ /=/o |
131 | 5 | 6 | ref $value and $value =~ /=/o and $value->isa('Class::Declare::Read') | |
859 | 212 | 18 | 10 | ref $value and $value =~ /=/o |
230 | 4 | 6 | ref $value and $value =~ /=/o and $value->isa('Class::Declare::Read') | |
880 | 144 | 0 | 9361 | ref $self and $hash = $__OBJECTS__{${$self;}} |
897 | 0 | 0 | 10 | ref $self and $hash = $__OBJECTS__{${$self;}} |
1079 | 902 | 36 | 128 | $vtype and $vtype ne 'CODE' |
938 | 128 | 0 | $vtype and $vtype ne 'CODE' and $__INSTANCE__{$type} | |
1211 | 0 | 0 | 4619 | defined $_[1] and $_[1]->isa($_[0]) |
1248 | 0 | 148 | 485 | $_[1]->isa($class) and $pkg eq $class |
1307 | 0 | 106 | 620 | $_[1]->isa($_[0]) and $pkg->isa($_[0]) |
1377 | 0 | 256 | 4544 | defined $_[1] and ref $_[1] |
256 | 0 | 4544 | defined $_[1] and ref $_[1] and $_[1]->isa($_[0]) | |
1413 | 0 | 64 | 17288 | defined $_[1] and ref $_[1] |
1415 | 0 | 98 | 17190 | $_[1]->isa($class) and $pkg eq $class |
1465 | 0 | 64 | 387 | defined $_[1] and ref $_[1] |
1467 | 0 | 70 | 317 | $_[1]->isa($_[0]) and $pkg->isa($_[0]) |
1718 | 19 | 28 | 9 | ref $value and ref $value eq 'CODE' |
1788 | 0 | 4 | 8 | $cloning and defined $code |
1984 | 130 | 0 | 77 | ref $self and $hash = $__OBJECTS__{${$self;}} |
2128 | 1 | 3 | 649 | ref $args and ref $args eq 'ARRAY' |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
599 | 0 | 212 | 0 | ref $class || $class |
622 | 179 | 25 | 5 | not defined $_args->{'init'} or ref $_args->{'init'} eq 'CODE' |
1022 | 4 | 301 | 0 | ref $self || $self |
1034 | 0 | 305 | 0 | local %_ || grep({not $_{$_}++;} reverse(@isa)) |
1085 | 23 | 52 | 0 | $memory{$value} ||= &Storable::dclone($value) |
1186 | 81 | 64 | 0 | $_[2] || $sub |
1215 | 0 | 0 | 0 | $_[2] || $sub |
1216 | 0 | 0 | 0 | ref $_[0] || $_[0] |
1243 | 0 | 0 | 633 | ref $_[0] || $_[0] |
1260 | 16 | 0 | 22 | exists $ref->{$pkg} or exists $ref->{$caller} |
1268 | 51 | 41 | 0 | $_[2] || $sub |
1302 | 0 | 0 | 726 | ref $_[0] || $_[0] |
1320 | 16 | 0 | 18 | exists $ref->{$pkg} or exists $ref->{$caller} |
1328 | 27 | 23 | 0 | $_[2] || $sub |
1383 | 0 | 0 | 256 | ref $_[0] || $_[0] |
1384 | 24 | 232 | 0 | $_[2] || $sub |
1410 | 0 | 0 | 17352 | ref $_[0] || $_[0] |
1427 | 8 | 0 | 18 | exists $ref->{$pkg} or exists $ref->{$caller} |
1435 | 71 | 55 | 0 | $_[2] || $sub |
1462 | 0 | 0 | 451 | ref $_[0] || $_[0] |
1480 | 8 | 0 | 14 | exists $ref->{$pkg} or exists $ref->{$caller} |
1488 | 53 | 45 | 0 | $_[2] || $sub |
1845 | 51 | 51 | 0 | ref $self || $self |
1863 | 24 | 0 | 42 | defined $class && exists $friend->{$class} || defined $method && exists $friend->{$method} |
1993 | 0 | 419 | 0 | ref $self or $self |
2002 | 0 | 559 | 0 | ref $self or $self |
2272 | 0 | 8 | 0 | ref $self || $self |
2328 | 3 | 781 | 0 | ref $self || $self |
2344 | 10 | 10 | 0 | ref $self || $self |