Branch Coverage

blib/lib/Authen/SASL.pm
Criterion Covered Total %
branch 15 36 41.6


line true false branch
22 0 17 unless @_
25 17 0 if /^[:\w]+$/
0 17 /::/ ? :
0 17 unless @Authen::SASL::Plugins = grep({eval "require $_" if /^[:\w]+$/;} map({/::/ ? $_ : "Authen::SASL::$_";} @_))
32 0 48 @_ % 2 ? :
40 48 0 if ref $opt{'callback'} eq 'HASH'
43 0 48 if exists $opt{'user'}
44 0 48 if exists $opt{'password'}
45 0 48 if exists $opt{'response'}
53 0 77 @_ ? :
60 0 99 if @_ == 1
76 33 0 if (eval "require $pkg" and $pkg->can('client_new'))
77 33 0 if ($$self{'conn'} = eval { do { $pkg->client_new($self, @_) } })
92 18 0 if (eval "require $pkg" and $pkg->can('server_new'))
93 18 0 if ($$self{'conn'} = eval { do { $pkg->server_new($self, @_) } })
104 0 0 if $$self{'conn'}
111 0 0 if @_
127 0 0 $$self{'conn'} ? :