blib/lib/Test/Given/Check.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 22 | 24 | 91.6 |
line | true | false | branch |
---|---|---|---|
17 | 4 | 304 | unless $$self{'sub'} |
22 | 20 | 284 | if ($@) |
32 | 135 | 60 | unless (exists $$self{'code'}) |
34 | 135 | 0 | @code > 1 ? : |
42 | 4 | 129 | unless $$self{'sub'} |
52 | 0 | 66 | unless $$self{'sub'} |
60 | 48 | 18 | if (my($left, $cmp, $right) = _split_expression($code[$#code])) |
62 | 24 | 24 | unless @package |
70 | 40 | 8 | unless ($left_value =~ / |
84 | 24 | 72 | if ($@) |
90 | 8 | 88 | unless defined $result |
141 | 66 | 67 | unless $passed |