blib/lib/Guacamole/Dumper.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 10 | 12 | 83.3 |
line | true | false | branch |
---|---|---|---|
23 | 0 | 30 | unless ref $tree eq "HASH" |
27 | 8 | 22 | $tree->{'type'} eq 'lexeme' ? : |
34 | 8 | 22 | $tree->{'type'} eq 'lexeme' ? : |
36 | 20 | 10 | if (&any(sub { ref $_; } , @tail)) { } |
37 | 28 | 0 | ref $_ ? : |
40 | 4 | 16 | if (&sum(map(length($_), @clean)) < 40) |