| blib/lib/Test/Stream/Compare/Hash.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 28 | 28 | 100.0 |
| line | true | false | branch |
|---|---|---|---|
| 17 | 785 | 53 | if (my $ref = $self->{'inref'}) { } |
| 18 | 1 | 784 | if $self->{'items'} |
| 19 | 1 | 783 | if $self->{'order'} |
| 25 | 3 | 50 | $self->{'items'} ? : |
| 26 | 2 | 51 | if ($self->{'order'}) { } |
| 30 | 1 | 1 | if @missing |
| 48 | 2 | 839 | unless $exists |
| 49 | 2 | 837 | unless $got |
| 50 | 3 | 834 | unless ref $got |
| 51 | 5 | 829 | unless &reftype($got) eq 'HASH' |
| 59 | 1 | 85 | unless defined $name |
| 63 | 1 | 84 | if exists $self->{'items'}{$name} |
| 85 | 1787 | 50 | $exists ? : |
| 95 | 4 | 830 | if ($self->{'ending'} and keys %fields) |