| blib/lib/ThaiSchema/JSON.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % | 
| condition | 7 | 17 | 41.1 | 
| line | l | !l | condition | 
|---|---|---|---|
| 75 | 0 | 0 | $self->error('Missing or empty input') and return undef | 
| 83 | 0 | 0 | $self->error('Wide character in input') and return undef | 
| line | !l | l&&!r | l&&r | condition | 
|---|---|---|---|---|
| 89 | 164 | 0 | 0 | $bytes =~ /$UTF_PATTERNS->{$_}/ and $encoding = $_ | 
| 131 | 33 | 0 | 8 | not $res and my $e = $@ | 
| 347 | 2 | 13 | 1 | $schema->is_integer and int $number != $number | 
| line | l | !l | condition | 
|---|---|---|---|
| 394 | 8 | 0 | pop @lines or '' | 
| 412 | 0 | 0 | pop @lines or '' |