blib/lib/Exporter/Declare/Magic/Parser.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 13 | 27 | 48.1 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
34 | 0 | 10 | 0 | $self->parts and @{$self->parts;} |
64 | 9 | 1 | 0 | $$part[1] && $$part[1] eq '(' |
104 | 6 | 4 | 0 | $self->parts->[1] && ($self->parts->[1] eq '=>' || $self->parts->[1] eq ',') |
106 | 8 | 0 | 2 | $is_arrow and $self->parts->[2] |
110 | 0 | 1 | 1 | $is_arrow and $is_ref |
0 | 0 | 1 | $is_arrow and $is_sub |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
110 | 1 | 0 | 1 | $is_arrow and $is_ref or @{$self->parts;} == 1 |
1 | 0 | 0 | $is_arrow and $is_sub or @{$self->parts;} == 1 | |
130 | 0 | 0 | 0 | eval '{ ' . $$specs[0][0] . ' }' || $self->bail($@) |