blib/lib/Perinci/Object/EnvResult.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 12 | 18 | 66.6 |
line | true | false | branch |
---|---|---|---|
20 | 0 | 0 | if (@_) |
28 | 2 | 3 | if (defined $new) |
29 | 0 | 2 | unless int $new eq $new and $new >= 100 and $new <= 555 |
40 | 1 | 2 | if (defined $new) |
41 | 0 | 1 | if ref $new |
55 | 1 | 2 | if (defined $new) |
65 | 1 | 2 | if (defined $new) |
66 | 0 | 1 | unless ref $new eq 'HASH' |
77 | 2 | 0 | if $status >= 200 |