| blib/lib/IP/Random.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 9 | 14 | 64.2 |
| line | true | false | branch |
|---|---|---|---|
| 49 | 0 | 2 | if (exists $args{'exclude'} and exists $args{'additional_types_allowed'}) |
| 64 | 0 | 1007 | if (¬all(sub { /$optre/u; } , keys %args)) |
| 70 | 1005 | 2 | unless (defined $args{'exclude'}) |
| 108 | 0 | 28138 | unless (defined $sub_cidr) |
| 109 | 0 | 28138 | unless (defined $ip) |
| 111 | 0 | 28138 | unless ($sub_cidr =~ m[\A(?:[\d\.]+)(?:/(?:\d+))?\z]u) |
| 126 | 864 | 27274 | if (($addr & $mask) == ($sub & $mask)) |