Branch Coverage

blib/lib/Perinci/Sub/Property/retry.pm
Criterion Covered Total %
branch 17 24 70.8


line true false branch
38 4 18 unless ref $v eq 'HASH'
46 0 110 if (defined $v->{$k} and ref $v->{$k} ne 'Regexp')
51 0 22 unless $v->{'n'} > 0
62 22 0 if ($args_as eq 'hash') { }
0 0 elsif ($args_as eq 'hashref') { }
69 0 22 if ($self->{'_arg'}{'meta'}{'result_naked'}) { }
76 2 20 if ($v->{'fatal_statuses'})
80 4 18 if ($v->{'non_fatal_statuses'})
85 2 20 if ($v->{'fatal_messages'})
90 4 18 if ($v->{'non_fatal_messages'})
98 2 20 if $v->{'delay'}
104 22 0 unless ($self->{'_meta'}{'result_naked'})