| blib/lib/Test/Stream/Compare/Hash.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 28 | 28 | 100.0 |
| line | true | false | branch |
|---|---|---|---|
| 14 | 801 | 53 | if (my $ref = $self->{'inref'}) { } |
| 15 | 1 | 800 | if $self->{'items'} |
| 16 | 1 | 799 | if $self->{'order'} |
| 22 | 3 | 50 | $self->{'items'} ? : |
| 23 | 2 | 51 | if ($self->{'order'}) { } |
| 27 | 1 | 1 | if @missing |
| 45 | 2 | 855 | unless $exists |
| 46 | 2 | 853 | unless $got |
| 47 | 3 | 850 | unless ref $got |
| 48 | 5 | 845 | unless &reftype($got) eq 'HASH' |
| 56 | 1 | 85 | unless defined $name |
| 60 | 1 | 84 | if exists $self->{'items'}{$name} |
| 82 | 1829 | 50 | $exists ? : |
| 92 | 4 | 846 | if ($self->{'ending'} and keys %fields) |