| blib/lib/JSON/ize.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 12 | 18 | 66.6 |
| line | true | false | branch |
|---|---|---|---|
| 20 | 4 | 12 | unless (defined $inp) |
| 23 | 0 | 12 | if (ref $inp) { } |
| 27 | 4 | 8 | if (looks_like_json($inp)) { } |
| 33 | 1 | 7 | unless -e $inp |
| 34 | 7 | 0 | if (eval 'require PerlIO::gzip; 1') { } |
| 35 | 0 | 7 | unless open $f, '<:gzip(autopop)', $inp |
| 38 | 0 | 0 | unless open $f, "$inp" |
| 44 | 4 | 0 | if (/at character offset/) |
| 46 | 2 | 2 | if (looks_like_json($j)) |