| lib/Perlbal/Plugin/UrlGroup.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 6 | 15 | 40.0 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 39 | 0 | 0 | 8 | $ss and $$ss{'role'} eq 'selector' |
| 69 | 0 | 0 | 3 | $svc and $$svc{'role'} eq 'selector' |
| line | l | !l | condition |
|---|---|---|---|
| 48 | 8 | 0 | $$ss{'extra_config'}{'_groups'} ||= {} |
| 98 | 36 | 0 | $$cb{'service'}{'extra_config'}{'_groups'} ||= {} |
| 135 | 36 | 0 | 'Perlbal'->service($dest_service) || undef |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 34 | 0 | 8 | 0 | $selname ||= $$mc{'ctx'}{'last_created'} |