| blib/lib/DBIx/RetryConnect.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 11 | 23 | 47.8 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 125 | 1 | 0 | 1 | @imports && ref $imports[0] |
| 127 | 0 | 2 | 0 | defined $options and ref $options ne 'CODE' |
| line | l | !l | condition |
|---|---|---|---|
| 135 | 0 | 2 | $installed_dbd_configs{$dbd} ||= [] |
| 159 | 0 | 2 | $ENV{'DBIX_RETRYCONNECT_VERBOSE'} || 0 |
| 214 | 0 | 1 | $ENV{'DBIX_RETRYCONNECT_VERBOSE'} || 0 |
| 227 | 0 | 1 | $$self{'start_delay'} ||= 0.1 |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 171 | 5 | 1 | 0 | $retry ||= do { my $options = pick_retry_options_from_configs($configs, \@_); return undef unless $options; $retry_state_class->new($options, \@_) } |
| 227 | 0 | 1 | 0 | $$self{'next_delay'} ||= ($$self{'start_delay'} ||= 0.1) |
| 228 | 0 | 1 | 0 | $$self{'max_delay'} ||= $$self{'total_delay'} / 4 |