| 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/) |