| blib/lib/Text/KDL/XS/Parser.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 17 | 26 | 65.3 |
| line | true | false | branch |
|---|---|---|---|
| 17 | 1 | 19 | unless defined $source |
| 22 | 2 | 17 | if (my $reftype = ref $source) |
| 23 | 1 | 1 | if $reftype eq "CODE" |
| 27 | 1 | 0 | if $reader |
| 48 | 3 | 0 | $version eq '2' ? : |
| 0 | 3 | $version eq '1' ? : | |
| 16 | 3 | $version eq 'detect' ? : | |
| 54 | 0 | 19 | if $opts->{'emit_comments'} |
| 63 | 0 | 1 | unless $reftype eq "GLOB" or builtin::blessed($source) |
| 68 | 0 | 1 | unless $can_sysread |
| 74 | 2 | 0 | if ($reftype eq 'GLOB') { } |
| 0 | 0 | elsif ($source->can('sysread')) { } | |
| 83 | 1 | 1 | defined $n && $n > 0 ? : |