blib/lib/FormValidator/Simple/Plugin/NetAddr/IP.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 11 | 12 | 91.6 |
line | true | false | branch |
---|---|---|---|
46 | 14 | 12 | unless ref $ip eq 'NetAddr::IP' |
47 | 9 | 3 | $ip->version == 4 && $ip->masklen == 32 ? : |
64 | 14 | 12 | unless ref $ip eq 'NetAddr::IP' |
65 | 12 | 0 | $ip->version == 4 && $ip->masklen <= 32 ? : |
74 | 4 | 48 | if $data =~ qr/[\\a-zA-Z]/ |
75 | 18 | 30 | unless $data =~ qr/\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}/ |