| blib/lib/PerlX/Assert.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 13 | 24 | 54.1 |
| line | true | false | branch |
|---|---|---|---|
| 25 | 3 | 1 | /\A[:-](\w+)\z/ && $HINTS{$1} ? : |
| 1 | 4 | ref $_ ? : | |
| 31 | 8 | 1 | if $symbols == 0 |
| 33 | 0 | 9 | ref $_[0] eq 'HASH' ? : |
| 43 | 0 | 9 | unless $me eq 'PerlX::Assert' |
| 65 | 9 | 0 | if ($name eq 'assert' and not ref $$globals{'into'}) |
| 67 | 0 | 9 | exists $$globals{'installer'} ? : |
| 77 | 0 | 9 | $tmp ? : |
| 92 | 10 | 3 | unless $$globals{'check'} |
| 95 | 0 | 0 | @_ == 1 ? : |
| 96 | 0 | 0 | if $value |
| 98 | 0 | 0 | if defined $desc |