blib/lib/PerlX/Assert.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 13 | 24 | 54.1 |
line | true | false | branch |
---|---|---|---|
27 | 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'}) |
68 | 0 | 9 | exists $globals->{'installer'} ? : |
79 | 0 | 9 | $tmp ? : |
92 | 10 | 3 | unless $globals->{'check'} |
95 | 0 | 0 | @_ == 1 ? : |
96 | 0 | 0 | if $value |
98 | 0 | 0 | if defined $desc |