| line |
true |
false |
branch |
|
60
|
0 |
22 |
if @_ < 2 |
|
62
|
22 |
0 |
ref $_[-1] eq 'HASH' ? : |
|
68
|
2 |
20 |
if defined $_[1] |
|
69
|
7 |
15 |
if defined $_[2] |
|
86
|
10 |
39 |
if $self->hashed_password eq htpasswd_encrypt($hash, $password, $self->hashed_password) |
|
105
|
1 |
13 |
if (@_) |
|
106
|
1 |
0 |
if $$self{'username'} ne $_[0] |
|
108
|
0 |
1 |
if $$self{'autocommit'} |
|
115
|
2 |
103 |
if (@_) |
|
117
|
1 |
1 |
if $$self{'autocommit'} |
|
124
|
2 |
16 |
if (@_) |
|
126
|
1 |
1 |
if $$self{'autocommit'} |
|
141
|
1 |
2 |
unless defined $password |
|
157
|
0 |
3 |
unless $self->can($key) |
|
158
|
1 |
2 |
ref $value eq 'ARRAY' ? : |
|
175
|
3 |
2 |
defined $self->extra_info ? : |
|
180
|
3 |
0 |
if ($self->file) |
|
181
|
1 |
2 |
if (defined $$self{'old_username'}) |