blib/lib/Assert/Refute/Driver/More.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 10 | 14 | 71.4 |
line | true | false | branch |
---|---|---|---|
61 | 0 | 23 | unless 'Test::Builder'->can('new') |
89 | 0 | 57 | if (ref $reason eq 'ARRAY') { } |
4 | 106 | elsif ($reason and $reason ne 1) { } | |
139 | 1 | 1 | if ($level == -1) { } |
1 | 0 | elsif ($level > 0) { } | |
182 | 1 | 1 | if exists $self->{'fail'}{$n} |
185 | 0 | 1 | unless $n =~ /^[1-9]\d*$/ and $n <= @t |