blib/lib/Log/Log4perl/Filter/CallerMatch.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 13 | 14 | 92.8 |
line | true | false | branch |
---|---|---|---|
26 | 6 | 6 | defined $$self{'SubToMatch'} ? : |
27 | 4 | 8 | defined $$self{'PackageToMatch'} ? : |
28 | 6 | 6 | defined $$self{'StringToMatch'} ? : |
30 | 2 | 10 | if (defined $$self{'CallFrame'}) |
53 | 28 | 16 | unless $package |
54 | 0 | 16 | unless $sub |
56 | 9 | 4 | if ($sub =~ /$s_regex/ and $package =~ /$p_regex/ and $message =~ /$m_regex/) |