| line |
true |
false |
branch |
|
21
|
1 |
17 |
unless @_ |
|
24
|
17 |
0 |
if /^[:\w]+$/ |
|
|
0 |
17 |
/::/ ? : |
|
|
0 |
17 |
unless @Authen::SASL::Plugins = grep({eval "require $_" if /^[:\w]+$/;} map({/::/ ? $_ : "Authen::SASL::$_";} @_)) |
|
31
|
1 |
52 |
@_ % 2 ? : |
|
39
|
49 |
4 |
if ref $opt{'callback'} eq "HASH" |
|
42
|
0 |
53 |
if exists $opt{'user'} |
|
43
|
3 |
50 |
if exists $opt{'password'} |
|
44
|
0 |
53 |
if exists $opt{'response'} |
|
53
|
0 |
80 |
if (@_) { } |
|
59
|
0 |
198 |
if @_ == 1 |
|
75
|
36 |
1 |
if (eval "require $pkg" and $pkg->can("client_new")) |
|
76
|
36 |
0 |
if ($self->{'conn'} = eval {
do {
$pkg->client_new($self, @_)
}
}) |
|
91
|
18 |
0 |
if (eval "require $pkg" and $pkg->can("server_new")) |
|
92
|
18 |
0 |
if ($self->{'conn'} = eval {
do {
$pkg->server_new($self, @_)
}
}) |
|
103
|
0 |
1 |
if $self->{'conn'} |
|
110
|
2 |
1 |
if @_ |
|
126
|
1 |
2 |
$self->{'conn'} ? : |