line |
true |
false |
branch |
42
|
0 |
1 |
unless (defined $h{'Type'}) |
47
|
0 |
0 |
$h{'Type'} == SASL_PWCHECK() ? : |
|
1 |
0 |
$h{'Type'} == SASL_AUTHD() ? : |
52
|
1 |
0 |
unless defined $h{'Dir'} |
54
|
1 |
0 |
if (defined $h{'Dir'} and not -d $h{'Dir'}) |
59
|
0 |
0 |
unless defined $h{'Path'} |
63
|
0 |
0 |
unless (-e $pwpath) |
69
|
0 |
0 |
$h{'TimeOut'} ? : |
70
|
0 |
0 |
unless $$self{'sock'} = 'IO::Socket::UNIX'->new('Type', 1, 'Peer', $pwpath) |
86
|
0 |
0 |
unless $$self{'sock'}->send($req) |
89
|
0 |
0 |
unless $sh = 'IO::Select'->new($$self{'sock'}) |
90
|
0 |
0 |
unless $sh->can_read($$self{'timeout'}) |
96
|
0 |
0 |
if (substr($res, 0, 2) ne 'OK') |