| blib/lib/AnyEvent/DNS.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 11 | 41 | 26.8 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 1102 | 0 | 0 | 0 | $dns and /^\s*(\S+)\s*$/ |
| 1209 | 0 | 0 | 5 | $port == 53 and grep(($_ eq $host), @{$$self{'server'};}) |
| 1315 | 17 | 0 | 0 | @{$self->{'reuse_q'};} and $self->{'reuse_q'}[0][0] <= $NOW |
| 1529 | 0 | 0 | 1 | $name eq lc $_->[0] && ($atype{'*'} || $atype{$_->[1]}) |
| 1535 | 0 | 0 | 0 | $name eq lc $_->[0] && $_->[1] eq 'cname' |
| line | l | !l | condition |
|---|---|---|---|
| 460 | 5 | 0 | $_->[2] or 'in' |
| 606 | 5 | 0 | $dec_rr{$rt} || sub { $_; } |
| 825 | 0 | 2 | $ENV{'PERL_ANYEVENT_MAX_OUTSTANDING_DNS'} * 1 || 10 |
| 1500 | 0 | 5 | $opt{'class'} || 'in' |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 564 | 5 | 0 | 0 | $type_str{$qt} || $qt |
| 5 | 0 | 0 | $class_str{$qc} || $qc | |
| 606 | 5 | 0 | 0 | $type_str{$rt} || $rt |
| 5 | 0 | 0 | $class_str{$rc} || $rc | |
| 1097 | 0 | 0 | 0 | /^\S/ or /^\s[^:]{16,}: / |
| 1324 | 0 | 0 | 0 | $self->{'reuse_to'} ||= &AE::timer($self->{'reuse_q'}[0][0] - $NOW, 0, sub { delete $self->{'reuse_to'}; $self->_scheduler; } ) |