blib/lib/custom/failures/x/alias.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 13 | 27 | 48.1 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
41 | 0 | 7 | 6 | @failures and substr($failures[0], 0, 1) eq "-" |
line | l | !l | condition |
---|---|---|---|
20 | 1 | 7 | $opt->{'-prefix'} // "" |
1 | 7 | $opt->{'-suffix'} // "" | |
98 | 1 | 0 | *{$fqn;}{"ARRAY"} // (*$fqn = []) |
104 | 0 | 7 | *{$fqn;}{"ARRAY"} // (*$fqn = []) |
110 | 0 | 7 | *{$fqn;}{"HASH"} // (*$fqn = {}) |
111 | 0 | 7 | $tags->{'all'} //= [] |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
45 | 1 | 0 | 0 | shift @failures // _croak("missing value for -prefix") |
50 | 1 | 0 | 0 | shift @failures // _croak("missing value for -suffix") |
55 | 0 | 0 | 0 | shift @failures // _croak("missing value for -alias") |
65 | 1 | 0 | 0 | shift @failures // _croak("missing value for -exporter") |