Condition Coverage

blib/lib/Net/DNSBL/Utilities.pm
Criterion Covered Total %
condition 22 29 75.8


and 3 conditions

line !l l&&!r l&&r condition
238 18 7 9 $a =~ /\./ and not $b =~ /\./
7 12 6 not $a =~ /\./ and $b =~ /\./
9 8 2 $a =~ /Black|White|Pass/ and not $b =~ /Black|White|Pass/
8 8 1 not $a =~ /Black|White|Pass/ and $b =~ /Black|White|Pass/
275 0 0 13 $Sfile =~ m[[^/]+$] and -d $`
391 0 0 46 ($flags = fcntl(SOCKET, &POSIX::F_GETFL(), 0)) || 1 and fcntl SOCKET, &POSIX::F_SETFL(), $flags | &POSIX::O_NONBLOCK()
422 0 0 4 ref $inref eq 'ARRAY' and ref $outref eq 'ARRAY'
466 1 2 33 $ip and $ip =~ /\d+\.\d+\.\d+\.\d+/
474 28 17 6 $ip >= $beg and $ip <= $end

or 2 conditions

line l !l condition
391 46 0 ($flags = fcntl(SOCKET, &POSIX::F_GETFL(), 0)) || 1