| blib/lib/Protocol/DBus/Connect.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 4 | 8 | 50.0 |
| line | true | false | branch |
|---|---|---|---|
| 11 | 2 | 0 | if ($addr_obj->transport eq "unix") |
| 14 | 0 | 2 | if ($path) { } |
| 18 | 0 | 2 | unless ($path = $addr_obj->attribute("path")) |
| 23 | 0 | 2 | unless (socket my $s, 1, 1, 0) |