Branch Coverage

blib/lib/Net/pWhoIs.pm
Criterion Covered Total %
branch 10 18 55.5


line true false branch
45 2 0 if (not $what =~ /\\d+\\.\\d+\\.\\d+\\.\\d+/)
47 0 2 if (scalar @host == 0) { }
64 0 2 if ($self->{'req'})
69 2 0 if ($what)
70 1 1 if (&Scalar::Util::reftype($what) eq 'ARRAY') { }
78 0 2 unless (@req)
88 0 2 unless $socket
96 2 0 if ($resolved)
133 32 0 if ($name and $value)