| blib/lib/Test/WWW/Mechanize/JSON.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 0 | 16 | 0.0 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 173 | 0 | 0 | 0 | defined $json and ref $json eq 'HASH' |
| 0 | 0 | 0 | defined $json and ref $json eq 'HASH' and not $@ |
| line | l | !l | condition |
|---|---|---|---|
| 183 | 0 | 0 | $json || undef |
| 243 | 0 | 0 | shift() || 'Has a utf-8 heaer' |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 143 | 0 | 0 | 0 | $text ||= exists $self->response->headers->{'x-json'} ? $self->response->headers->{'x-json'} : $self->content |
| 217 | 0 | 0 | 0 | not ref $json or ref $json ne 'HASH' |