| blib/lib/Config/TinyDNS.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 13 | 14 | 92.8 |
| line | true | false | branch |
|---|---|---|---|
| 70 | 39 | 573 | $1 eq '#' ? : |
| 612 | 14 | s/(.)// ? : | |
| 100 | 2 | 259 | unless my $f = $Filters{$k} |
| 110 | 1 | 263 | unless defined $f |
| 121 | 0 | 606 | @_ ? : |
| 206 | 1 | 69 | if $Filters{$k} |
| 207 | 7 | 51 | unless ref $c and reftype $c eq 'CODE' || reftype $c eq 'REF' && reftype $$c eq 'CODE' |