| line |
true |
false |
branch |
|
25
|
2 |
3 |
defined $args{'max_attempts'} ? : |
|
|
4 |
1 |
defined $args{'base_delay_ms'} ? : |
|
|
4 |
1 |
defined $args{'max_delay_ms'} ? : |
|
|
5 |
0 |
defined $args{'jitter'} ? : |
|
|
0 |
5 |
defined $args{'strategy'} ? : |
|
33
|
0 |
2 |
if ref $code ne "CODE" |
|
51
|
1 |
3 |
if $ok |
|
53
|
0 |
3 |
if $attempt >= $self->{'max_attempts'} |
|
54
|
1 |
2 |
unless $self->should_retry($last_err, $attempt) |
|
58
|
0 |
2 |
if (ref $self->{'on_retry'} eq "CODE") |
|
75
|
1 |
2 |
if (ref $self->{'retry_on'} eq "CODE") |
|
76
|
0 |
1 |
$self->{'retry_on'}->($err, $attempt) ? : |
|
89
|
7 |
0 |
if ($self->{'strategy'} eq 'exponential') { } |
|
95
|
1 |
6 |
if $raw > $max |
|
97
|
7 |
0 |
if ($self->{'jitter'} eq "none") |
|
100
|
0 |
0 |
if ($self->{'jitter'} eq "full") |
|
112
|
0 |
15 |
if not defined $self->{$k} && $self->{$k} =~ /^\d+$/u or $self->{$k} <= 0 |
|
116
|
1 |
4 |
if $self->{'max_delay_ms'} < $self->{'base_delay_ms'} |
|
119
|
1 |
3 |
if $self->{'jitter'} ne "none" and $self->{'jitter'} ne "full" |
|
122
|
0 |
3 |
if $self->{'strategy'} ne "exponential" |
|
125
|
5 |
1 |
unless defined $self->{$k} |
|
126
|
0 |
1 |
if ref $self->{$k} ne "CODE" |