| blib/lib/App/LJ.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 4 | 6 | 66.6 |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 13 | 2 | 1 | 0 | $_coder ||= 'JSON::XS'->new->pretty(1) |
| 54 | 1 | 1 | 0 | $$self{'printer'} ||= do { !$$self{'color'} ? sub { chomp(my $l = $_coder->encode(shift())); $l; } : sub { JSON::Color::encode_json(shift(), {'pretty', 1}); } } |