blib/lib/DracPerl/Client.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 12 | 20 | 60.0 |
line | true | false | branch |
---|---|---|---|
41 | 0 | 1 | unless $self->_check_res('Login Step 0 performed', $login_form->is_success) |
56 | 2 | 0 | if ($response_raw->is_success) |
61 | 1 | 1 | if $logged |
62 | 0 | 2 | if $current_tries > $self->max_retries - 1 |
68 | 0 | 1 | unless $logged |
76 | 1 | 0 | if $tokens_parts[0] |
91 | 0 | 1 | unless $self->token |
99 | 1 | 0 | if $response->is_success |
101 | 1 | 0 | if $self->single_use |
109 | 3 | 1 | if ($condition) { } |