blib/lib/PerlX/Assert.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 6 | 15 | 40.0 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
25 | 1 | 0 | 3 | /\A[:-](\w+)\z/ && $HINTS{$1} |
65 | 0 | 0 | 9 | $name eq 'assert' and not ref $$globals{'into'} |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
43 | 0 | 0 | 0 | $IMPLEMENTATION ||= $me |
49 | 4 | 0 | 0 | eval { do { die if $NO_KEYWORD_API; require PerlX::Assert::Keyword; 'PerlX::Assert::Keyword' } } || do { require PerlX::Assert::DD; 'PerlX::Assert::DD' } |
5 | 4 | 0 | $IMPLEMENTATION ||= eval { do { die if $NO_KEYWORD_API; require PerlX::Assert::Keyword; 'PerlX::Assert::Keyword' } } || do { require PerlX::Assert::DD; 'PerlX::Assert::DD' } |