Condition Coverage
blib/lib/DNS/BL/cmds/add.pm
Criterion
Covered
Total
%
condition
2
5
40.0
and 3 conditions
line
!l
l&&!r
l&&r
condition
100
0
0
29
exists $args{'ip'} and $ip = 'NetAddr::IP'->new($args{'ip'})
or 2 conditions
line
l
!l
condition
137
0
2
$args{'code'} || '127.0.0.1'