Branch Coverage

blib/lib/CGI/Builder/Auth/User.pm
Criterion Covered Total %
branch 18 26 69.2


line true false branch
73 1 13 unless $_[0]->_exists
92 1 7 if $username eq 'anonymous'
93 1 6 if $self->_exists($username)
95 0 6 if $self->_user_admin->{'ENCRYPT'} eq 'MD5'
98 6 0 $self->_user_admin->add($username, $password, $data) ? :
107 11 19 defined $_[1] ? :
112 0 4 defined $_[1] ? :
117 0 1 defined $_[1] ? :
122 0 1 defined $_[1] ? :
129 0 5 unless $self->_exists
130 0 5 if $self->_user_admin->{'ENCRYPT'} eq 'MD5'
134 5 0 $self->_user_admin->{'ENCRYPT'} eq 'crypt' ? :
140 18 5 if ref $_user_admin and not &Scalar::Util::isweak($_user_admin)