| blib/lib/WWW/LogicBoxes/Contact/Factory.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 5 | 6 | 83.3 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 23 | 5 | 1 | 1 | grep {$_ eq 'domus';} @{$$response{'contacttype'};} and exists $response->{'ApplicationPurpose'} |
| 1 | 1 | 0 | grep {$_ eq 'domus';} @{$$response{'contacttype'};} and exists $response->{'ApplicationPurpose'} and exists $response->{'NexusCategory'} |